#!/usr/bin/perl

use strict;
open (PIPE,"| perl non-existant_file") or die "Can't open pipe: $!";
print "hello";
sleep 5;
print "goodbye";