in reply to How To Count Lines In File?
perl -e 'print @{[<>]}.$/' some_file_here [download]
_________broquaint
$ perl -lp0777e'$_=tr/\n//' foo [download]
Makeshifts last the longest.