diff options
| author | ivan <ivan> | 2004-05-28 11:21:46 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2004-05-28 11:21:46 +0000 |
| commit | 2e1a3719f1a9fb1f561d0eb4df349f3f03d66681 (patch) | |
| tree | 08fc54ece6d4782c677477066b5fb5048f0ab37c /httemplate/misc | |
| parent | d8ff6db2dbaec9cc8daad2d4af0254f167aa7a66 (diff) | |
better error reporting on unparsable filenames
Diffstat (limited to 'httemplate/misc')
| -rw-r--r-- | httemplate/misc/upload-batch.cgi | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/httemplate/misc/upload-batch.cgi b/httemplate/misc/upload-batch.cgi index cc5346606..da5e41cbc 100644 --- a/httemplate/misc/upload-batch.cgi +++ b/httemplate/misc/upload-batch.cgi @@ -2,7 +2,7 @@ my $fh = $cgi->upload('batch_results'); my $filename = $cgi->param('batch_results'); - $filename =~ /^.*[\/\\]([^\/\\]+)$/ or die; + $filename =~ /^.*[\/\\]([^\/\\]+)$/ or die "unparsable filename: $filename\n"; my $paybatch = $1; my $error = defined($fh) |