#!/usr/bin/perl

  open (CMD, '-|', "boguscommand 'filename'") or die "Uh-oh $!";
  print "Oops, I didn't die\n";

  open (CMD, '-|', "boguscommand filename") or die "Uh-oh $!";
  print "But I did\n";