in reply to Perl LOC counter?

How about perl -MO=Deparse foo.pl | wc -l?

Replies are listed 'Best First'.
Re: Re: Perl LOC counter?
by MrYoya (Monk) on May 14, 2003 at 23:10 UTC
    Nice. One caveat: this will include __DATA__ and __END__ and the lines following if you don't want to consider those LOC.
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom