Print args in case requirement fails

This commit is contained in:
unknown 2008-03-10 14:09:59 +01:00
parent 8d738693c0
commit 551ab51c91

View File

@ -124,8 +124,8 @@ sub new {
@_
);
my $path = delete($opts{'path'}) or die "path required";
my $args = delete($opts{'args'}) or die "args required";
my $path = delete($opts{'path'}) or die "path required @_";
my $args = delete($opts{'args'}) or die "args required @_";
my $input = delete($opts{'input'});
my $output = delete($opts{'output'});
my $error = delete($opts{'error'});