| 76 |
|
$exeName =~ s/^.*\/([^\/]*)$/$1/; |
| 77 |
|
|
| 78 |
|
print "Usage: $exeName [OPTION]... CRAB_DIR OUTPUT_DIR\n"; |
| 79 |
+ |
print " or: $exeName -d [OPTION]... OUTPUT_DIR\n"; |
| 80 |
|
print "Deletes excess EDM output caused by multiple CRAB submissions using the results\n"; |
| 81 |
|
print "contained in the CRAB working directory provided.\n"; |
| 82 |
|
print "\n"; |
| 108 |
|
my @status = `grep 'ExitStatus' $crabDir/res/$file`; |
| 109 |
|
my $wrapperStatus = $status[0]; |
| 110 |
|
$wrapperStatus =~ s/^.*ExitStatus="([^"]*)".*$/$1/; |
| 111 |
+ |
$wrapperStatus =~ s/\n//g; |
| 112 |
|
if ($wrapperStatus != 0) |
| 113 |
|
{ |
| 114 |
|
print "Job $jobNumber failed (return value $wrapperStatus). Skipping.\n"; |
