Damian Conway <[EMAIL PROTECTED]> writes: > @a =^+ 1; # evaluate each element of the list (1) in a numeric > # context and assign the resulting list to @a > # i.e. @a = $_ foreach +1; > > @a ^=+ 1; # evaluate 1 in a numeric context and assign it to > # each existing element of @a > # i.e. $_ = +1 foreach @a; > > @a ^+= 1; # add-assign 1 to each element of @a > # i.e. $_ += 1 foreach @a;
Perl 6 is actually APL in drag. * _Dave quad backspace divides furiously. So, let's say we can use alternate character sets in perl6 AND we can pretty much overload all the operators AND create new ones on the fly AND all the matrix libraries are there THEN we can code APL in perl. -- David Hodgkinson, Wizard for Hire http://www.davehodgkinson.com Editor-in-chief, The Highway Star http://www.deep-purple.com Interim Technical Director, Web Architecture Consultant for hire ---------- chmod a+x /bin/laden ----------
