Determine File Size (Rated 5)Description:
This little code snippet shows how you can determine the size of a file in Perl.
Thanks to Scorpions4ever at devshed for writing this :) Code starts here
# Written by Scorpions4ever @ devshed
$filename = "test.txt"; # your filename comes here
my ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, $mtime,
$ctime, $blksize, $blocks) = stat $filename;
print "Size of $filename in bytes = $size\n";
Last Edited: 1046393343
Submitted by Devscripts on 28-02-2003 0:49 |
