$log = "moooojlfdkafj.txt"; $down="false"; open (FH, $log) or $down = "true"; print $down;