Select Code to Download

C:\tmp>perl -MO=Deparse,-p -e"sub ten {10}; print ten() - 1"
sub ten {
...
-e syntax OK

C:\tmp>