perl -pe 's/eval/print/' tucano_obfu.pl | perl | perltidy