Comments on: Why Perl Complex Code requires less lines

By: Peteris Krumins

Peteris Krumins — Thu, 08 Jan 2009 12:13:08 +0000

Count lines via:

perl -pe '$_ = “$. $_”'

By: pkrumins

pkrumins — Thu, 08 Jan 2009 07:13:08 +0000

Count lines via:

perl -pe '$_ = “$. $_”'

By: Stephen P. SChaefer

Stephen P. SChaefer — Wed, 07 Jan 2009 23:55:27 +0000

I can remove two lines from the last example, using yet another special variable, which is already counting line numbers:

while(<>) {
print "$.t$_";
}