$/=
('echo q/Just another Perl /|
$/' =~ m/(.*)/);
@ARGV = ${$- = $.};
$_ =~ s//<>/ee;
print; 
hacker;