my $filename = "c:\data.txt";
open FH, $filename or die "Can't open $filename:$!\n";
print "The file is $filename\n";