Changeset 18986 for trunk/pstamp/scripts/pstamp_webrequest.pl

Timestamp:

Aug 8, 2008, 3:48:28 PM (18 years ago)

Author:

bills

Message:

pass along verbose if provided

File:

• trunk/pstamp/scripts/pstamp_webrequest.pl (modified) (2 diffs)

trunk/pstamp/scripts/pstamp_webrequest.pl

@@ -83 +83 @@
 {
     my $command = "$pstamprequest -req_name $request_name -project $project $request_file @ARGV";
-    $command .= " -$job_type" if $job_type;     # default job_type is stamp
+    $command .= " -$job_type" if $job_type;     # default job_type is pstamp
 
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
@@ -98 +98 @@
     ### In list mode just parse the file print the output and we're done
     ###
-    my $command = "$pstampparse --mode list_uri --file $request_file --dbname $dbname";
+    my $command = "$pstampparse --mode list_uri --file $request_file";
+    $command .= " --dbname $dbname" if $dbname;
+    $command .= " --verbose" if $verbose;
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
         run(command => $command, verbose => $verbose);