SPUG: -MO=Deparse; what it is?

Tim Maher/CONSULTIX tim at consultix-inc.com
Sat Jan 29 16:57:32 CST 2000


(E-)?SPUG-ticians,

In a Perl Beautification discussion I had with somebody,
the following -MO=Deparse business came up.  Does anybody
know what this is?  (My O'Reilly bookshelf seems mute on
the subject, and the person who brought this up has long
since "gone out of scope" (mine, not his)).

It sure gives interesting output, but I wouldn't call it
a beautifier; it's more like an overzealous copy-editor!

$ perl -n -e '1 .. 10 and print;' /etc/motd
Linux 2.0.36. (POSIX).

$ perl -MO=Deparse -n -e '1 .. 10 and print;' /etc/motd
-e syntax OK
LINE: while (defined($_ = <ARGV>)) {
    print $_ if 1 .. 10;
}
$ 

*========================================================================*
| Tim Maher, PhD  Consultix &              (206) 781-UNIX/8649           |
|  Pacific Software Gurus, Inc             Email: tim at consultix-inc.com  |
|  UNIX/Linux & Perl Training              http://www.consultix-inc.com  |
| 2/22: UNIX  2/28: Perl Modules  2/29: Int. Perl  3/3: Pattern Matching |
*========================================================================*

 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    POST TO: spug-list at pm.org        PROBLEMS: owner-spug-list at pm.org
 Seattle Perl Users Group (SPUG) Home Page: http://www.halcyon.com/spug/
 SUBSCRIBE/UNSUBSCRIBE: Replace ACTION below by subscribe or unsubscribe
        Email to majordomo at pm.org: ACTION spug-list your_address





More information about the spug-list mailing list