If you enable warnings and strict the following is displayed:
Unquoted string "petrol" may clash with future reserved word at ./blah
+.pl line 5.
Name "main::petrol" used only once: possible typo at ./blah.pl line 5.
print() on unopened filehandle petrol at ./blah.pl line 5.
Cheers,
s;;5776?12321=10609$d=9409:12100$xx;;s;(\d*);push @_,$1;eg;map{print chr(sqrt($_))."\n"} @_;
|