open(LOG, $file) or die "Can't read '$file': $!";