note
BrowserUk
<blockquote><i></i></blockquote>
<p>If there's any chance that the file can be of any real size at all, and you only want the line count, you'd be much better off using:
<code>
my $lines; ++$lines while <$file>;
</code>
<p>Building a potentially huge list only to throw it away, just to count the lines, will be very costly in terms of time and memory.
<div class="pmsig"><div class="pmsig-171588">
<hr />
<font size=1 >
<div>With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'</div>
<div>Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.</div>
<div>"Science is about questioning the status quo. Questioning authority". </div>
<div>In the absence of evidence, opinion is indistinguishable from prejudice.
<p align=right> [http://thebottomline.cpaaustralia.com.au/|RIP Neil Armstrong]</p></div>
</font>
</div></div>
1001549
1001549