note gav^ To find the size of a file you can use: <code>my $size = -s $file; </code> The -X file tests are documented <a href="http://www.perldoc.com/perl5.8.0/pod/func/-X.html">here</a>. <p> You could also use the core module <a href="http://www.perldoc.com/perl5.6.1/lib/File/stat.html">File::stat</a> which provides dev, ino, mode, nlink, uid, gid, rdev, size, atime, mtime, ctime, blksize, and block. I tend to find this easier than remembering what order <a href="http://www.perldoc.com/perl5.6.1/pod/func/stat.html">stat</a> returns things. <code>use File::stat; my $st = stat($file); my $size = $st->size; </code> <p>gav^ 191173 191173