the "hidden" '}' at the end of:

else {print "@{ $Tests{$test} }\n";}

means it's valid.. maybe not correct, but I don't think it's got to do with the problem..

cheers,

J