Re: Need help shortening this

I get the following error on both ActivePerl 5.8.0 (WinMe) and Perl 5.6.0 (Linux Mandrake):

Undefined subroutine &main:: called at tempfile.pl line 4.

$;=sub{$/};@;=map{my($a,$b)=($_,$;);$;=sub{$a.$b->()}}
split//,".rekcah lreP rehtona tsuJ";$\=$ ;->();print$/
[download]

Comment on Re: Need help shortening this Download Code

Replies are listed 'Best First'.
Re: Re: Need help shortening this by jynx (Priest) on Nov 18, 2003 at 21:28 UTC
there can't be any whitespace in `$z`. If you copy/paste, delete any such white space before running the code and that should work. If it doesn't then . . . i don't know :-( jynx	[reply] [d/l]
Re: Re: Need help shortening this by ambrus (Abbot) on Nov 19, 2003 at 11:30 UTC
I've got that too first, but then I removed all newlines, and it worked that way.	[reply]