X-Git-Url: http://git.rot13.org/?p=safeq;a=blobdiff_plain;f=xwc-jobs.pl;h=69c3d7205abf148be200d6a22dc2929152facb35;hp=3d13b0766bfcb6dfcd5aecd62fb6c2578810b07e;hb=a79131f7b8d41e2e1c68ebb23d4fbd07250b9823;hpb=1a7003fa980a568b1f68bc173ec638a1070be56b diff --git a/xwc-jobs.pl b/xwc-jobs.pl index 3d13b07..69c3d72 100755 --- a/xwc-jobs.pl +++ b/xwc-jobs.pl @@ -16,7 +16,7 @@ if ( $op =~ m/^l/i ) { # list } elsif ( $op =~ m/^h/i ) { # history $url = 'jbhist.htm'; } elsif ( $op =~ m/^(d|c)/i ) { # delete/cancel - my $job_id = shift @ARGV || die "expected job_id missing"; + my $job_id = join('/', @ARGV) || die "expected job_id(s) missing"; open(my $curl, '-|', "curl --silent -XPOST -d OPR=CANCEL -d JOBS=$job_id/ http://$ip/JOBCTRL.cmd"); while (<$curl>) { if ( m//i ) {