open(QTREES,$file1) or (print "foo") && return;