print (open(FH,"<".$log) ? "opened" : "unable to open $!"), "\n";