How to run this beast? I created file joke.pl, it starts with:

#!/usr/bin/perl
$|++;;($;,$:,$,,$\,$^,$==>$~,$.,$})=("Izntvar n",
"Prey pbqr","fpevor"=>        "!$/","ernql"=>$^F,
...
[download]

but when I run it I get:

Missing comma after first argument to join or string function at ./jok
+e.pl line 7, near "@_]"
Execution of ./joke.pl aborted due to compilation errors.
[download]

I run:
perl -version
This is perl, v5.8.3 built for i386-linux-thread-multi

Ugh, help?

Max

Edited by Chady -- fixed formatting.