$file='File Path';
print "\nFile $file ", (-e $file && -f $file ) ? "exists" : "doesn't exists";

##</code><code>##

open (FILEHANDELER,"FILEPATH") || die "Cannot open the input file : $!";