For those mystified by certain bits of Perl, the built-in Deparse module is nice. perl -MO=Deparse /some/script Outputs a (usually) more readable equivalent,

For those mystified by certain bits of Perl, the built-in Deparse module is nice. perl -MO=Deparse /some/script Outputs a (usually) more readable equivalent, and also works for one-liners that use -e "somesnippet".