That's odd. @{ +shift } should be the same as @{ shift(@_) }. What version of Perl mistook it for @shift?
_____________________________________________________
Jeff[japhy]Pinyan:
Perl,
regex,
and perl
hacker, who'd like a job (NYC-area)
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;
| [reply]
[d/l]
[select] |
well, the arry deref wasn't working so I removed the plus sign just to see if it would do anything. That code - @{ shift } - was mistaken to be @shift. Adding the explicit argument list seemed to work. This is under WinMe, perl 5.8.0.
I haven't tried it on Linux yet (frankly, I can't see how this would make a difference but, *shrug* you never know).
What did you test on? B/c it seems to work for 2 people and not work for 2...
| [reply]
[d/l]
[select] |
I wrote it for Perl 5.005_03 (still on one machine I use), and added 'warnings'. I'll try it on my 5.8.0 on Linux... and it works just fine.
_____________________________________________________
Jeff[japhy]Pinyan:
Perl,
regex,
and perl
hacker, who'd like a job (NYC-area)
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;
| [reply] |
Unfortunately this isn't correct - I'm using perl 5.6.0 (Darwin) and the code doesn't work although I made the suggested change. Rather strange.
| [reply] |