perl -MO=Deparse,-p input-file.pl