sed 's/eval/print#/' obfu.pl | perl | perl -MO=Deparse