- Timestamp:
- Jun 12, 2026, 2:47:49 PM (7 weeks ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/eam_branches/ipp-pstamp-20260421/pstamp/scripts/pstamp_webrequest.pl
r43048 r43052 46 46 47 47 48 use IPC::Cmd 0.36 qw( can_run run);48 use IPC::Cmd 0.36 qw( can_run ); 49 49 50 50 use PS::IPP::Config qw($PS_EXIT_SUCCESS … … 58 58 metadataLookupBool 59 59 caturi 60 ps_run 60 61 ); 61 62 … … 102 103 103 104 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 104 run(command => $command, verbose => $verbose);105 ps_run(command => $command, verbose => $verbose); 105 106 unless ($success) { 106 107 print STDERR @$stderr_buf; … … 120 121 $command .= " -dbserver $dbserver" if $dbserver; 121 122 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 122 run(command => $command, verbose => $verbose);123 ps_run(command => $command, verbose => $verbose); 123 124 unless ($success) { 124 125 print STDERR @$stderr_buf; … … 140 141 $command .= " -dbserver $dbserver" if $dbserver; 141 142 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 142 run(command => $command, verbose => $verbose);143 ps_run(command => $command, verbose => $verbose); 143 144 unless ($success) { 144 145 print STDERR @$stderr_buf;
Note:
See TracChangeset
for help on using the changeset viewer.
