##
#!/usr/bin/env perl -w
use strict;
use warnings;
use Diagnostics;
my $file = "InFile.csv";
{
open( INFILE, "$file" )
or die("Can not open input file: $!");
close(INFILE);
}
####
C:\Program Files\Zombie>perl C:\Users\Desktop\Dist_Folder\filerun.pl
####
Can not open input file: No such file or directory at ...line xyz