wc -l на perl

# perl -nle 'END { print $.; }' dnswalk/*
1981
# wc -l dnswalk/*
  164 dnswalk/CHANGES
  414 dnswalk/dnswalk
  221 dnswalk/dnswalk.1
   96 dnswalk/dnswalk.errors
   16 dnswalk/do-dnswalk
   30 dnswalk/makereports
   95 dnswalk/README
  899 dnswalk/rfc1912.txt
   28 dnswalk/sendreports
   18 dnswalk/TODO
 1981 total
#