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