unless(open(OUTPUT,">$fname")) {
    log_error("Could not open $fname because $!\n");
    exit
}