open(TESTFILE,"<",$TestFile) or die "ERROR: Unable to open $TestFile for reading"; } #### if (!open(TESTFILE,$TestFile)) { print "ERROR: Unable to open Test File for reading: $TestFile"; exit();