perl -MO=Deparse monica.pl