Monday, July 18, 2011

Check if File Exists

# Function Name : FileExists
# Input : Filename with path
# Output : None
# Description : Check if file exists
sub FileExists($)
{
my $filename = $_;
unless (-e $filename)
{
die "Error Could not find $filename\n";
}
}

1 comment: