File Exist script in Perl

#!/usr/bin/perl -w

$filename = 'C:\myfile.txt';

if (-e $filename) {

    print "File Exists!";

}
else
{

print "File does not Exist!";

}