open NEWPLAYBUILDFILE, ">", "$c_streamingPlayBuildData/PlayBuild.txt.good"; open PLAYBUILDLOGFILE, ">", "$c_streamingPlayBuildData/PlayBuild.txt.check"; open FILE, "<", "$c_streamingPlayBuildData/PlayBuild.txt" or die "Failed to open PlayBuild.txt"; my %buildhash; while (my $line = ) { my $success = 0; my ($build) = $line =~ s/\n//; #if (!-f "$c_streamingBuildData\\${line}\\PlayBuild_IX86.AHV") if (!-f "$c_streamingBuildData/${line}/PlayBuild_IX86.AHV") { print ("${line}: PlayBuild_IX86.AHV does not exist\n"); print PLAYBUILDLOGFILE ("${line}: PlayBuild_IX86.AHV