Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re: Favourite One-liners?

by tlm (Prior)
on Jun 28, 2005 at 12:54 UTC ( #470609=note: print w/ replies, xml ) Need Help??


in reply to Favourite One-liners?

Though it is not the infallible oracle I once thought it was, I still make frequent use of

% perl -MO=Deparse,-p -e '<Perl code>'
...to figure out how perl is parsing something, or maybe to get a grip on some obfu. E.g. if you wonder what this one-liner does
-nle '}{print$.' foobar.txt
feed it to -MO=Deparse,-p (make sure to retain any other command line switches, like -nl here):
% perl -MO=Deparse,-p -nle '}{print$.' BEGIN { $/ = "\n"; $\ = "\n"; } LINE: while (defined(($_ = <ARGV>))) { chomp($_); } { print($.); } -e syntax OK
Note that the -p in this one-liner is part not perl's command line switch, but rather an argument to B::Deparse.

Less commonly , I use other backends, such as B::Terse and B::Concise, instead of B::Deparse. See also O and B.

the lowliest monk


Comment on Re: Favourite One-liners?
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://470609]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (9)
As of 2014-12-25 10:14 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (160 votes), past polls