CGI File size
File size
$filename = "file.txt"; # your filename
my ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, $mtime,
$ctime, $blksize, $blocks) = stat $filename;
print "Size: $filename bytes = $size\n";
CODE
LIBARY.COM