in reply to Re^2: calculating lines
in thread calculating lines

$wc += split; within the while loop will do it. That's another case of default arguments.

After Compline,
Zaxo

In Section Seekers of Perl Wisdom