Re: Getting file size

open(F,$filename) || die "Could not open file '$filename' : $!\n";
while (<F>) {
    $size += length($_);
}
close(F);
[download]

</sarcasim>

from the frivolous to the serious

Comment on Re: Getting file size Download Code

Replies are listed 'Best First'.
DO NOT REALLY USE by Anonymous Monk on Sep 24, 2002 at 23:21 UTC
`open(F, "> $filename") or die "Could not open file '$filename': $!\n"; close(F); $size = 0;` [download]	[reply] [d/l]
Re: Re: Getting file size by grantm (Parson) on Sep 25, 2002 at 09:00 UTC
I'll see your sarcasm and raise you one dose of pedantry :-) On Win32, your code would not work reliably unless you add `binmode(F)` since every CRLF pair will get converted to the single character LF.	[reply] [d/l]