On Thu, 16 May 2002 13:56:48 +0200
Beno <[EMAIL PROTECTED]> wrote:
: > Fun, but none too impressive:
: >
: > #!perl -l
: > (1x pop)=~/^(1+)\1+$(?{$x+=$+[1]})./;print$x
: >
: > Can't break 41. Grrrr.
:
: By the way, would you explain the meaning of $+[1] ?
: Is this a not documented perlvar @+ ?perldoc perlvar /LAST_MATCH_END -- fxn
