I found a rough and ready fix
I changed:
} else {
$pod_validpage=1;
$pod_status=$pod_res->status_line;
$pod_output="$pod_output<h3>POD encountered the following error while trying to run:
$pod_status\n";
$pod_output="$pod_output
Attempted retrieval URL: $pod_url</h3>\n\n";
}
for:
} else {
use CGI qw/:standard/;
my $url = 'http://www.australian1.com/services/error.html';
print redirect($url);
}
It would be nice to have this in podvars rather than changing the program