If a file exists in Perl

 #!/usr/bin/perl -w
 
 $filename = '/path/to/your/file.doc';
 if (-e $filename) {
     print "File Exists!";
 } 

 Also get the file size:

 #!/usr/bin/perl -w
 
 $filename = '/path/to/your/file.doc';
 $filesize = -s $filename;
 print $filesize;