perl -MO=Deparse file.pl