use CGI::Carp qw(fatalsToBrowser); # rest of script my $CMD="some command"; system("$CMD"); ( $? == 0 ) ? print "job success\n" : print "job failure\n";