in reply to Byte Count

$filesize = -s $filespec;

[download]

In Section Seekers of Perl Wisdom