More AUTOLOAD nonsense.

#!/usr/bin/perl -nl40
BEGIN{sub AUTOLOAD{$/?print
$AUTOLOAD:chop($/=$AUTOLOAD)}
(undef$/)->(pipe STDIN=>STDOUT);
map&$_,qw;

just another perl hacker

;;close}
$k.=$_}{
die"$k
"
[download]