#!/usr/bin/perl -w

use strict;

open(BAD, "/no-such-path/not_here.sh |") || die "Died with: $!\n";
close(BAD);