- perl -MO=RecDeparse,deparse,[@B__Deparse_opts],level,-1 [ -e '...' | bleh.pl ]
+ # Deparse recursively a Perl one-liner :
+ $ perl -MO=RecDeparse,deparse,@B__Deparse_opts,level,-1 -e '...'
+
+ # Or a complete Perl script :
+ $ perl -MO=RecDeparse,deparse,@B__Deparse_opts,level,-1 x.pl