<% my( $jobnum ) = $cgi->param('jobnum'); my( $url ) = $cgi->param('url'); my $job = ''; if ( $jobnum =~ /^(\d+)$/ ) { $job = qsearchs('queue', { 'jobnum' => $jobnum } ); } if ( $job && $job->status ne 'failed' ) { %> Please wait...

Please wait...


<%= $job->statustext %>%

(progress of job #<%= $jobnum %>) <% } elsif ( !$job ) { #handle job gone case : job sucessful # so close popup, redirect parent window... #eidiot("write success handler (jobnum $jobnum)"); %> Operation successful <% } else { %> Error

Error: <%= $job ? $job->statustext : $jobnum %>

<% } %>