my $kid = open(my $fh, "launch_java.sh |")
    or die "Couldn't launch 'launch_java.sh': $! / $?";
END {
    if ($kid) {
        kill 9 => $kid; # bang
    };
};