close $fh1 or warn "subprocess failed: status=$?\n";