> try {
> my $rval = Execute({ inputfile => '*', errors => \@errors,
>options => HTML::Embperl::optReturnError});
> if ($rval || @errors) {
> $this->Error(0);
> Execute("$ENV{DOCUMENT_ROOT}/error.html", $rval, @errors);
> }
A slight correction to this, which I just came across. You would
probably want to do
if ($rval) {
...
} elsif (@errors) {
}
If $rval isn't set, and there is something in @errors, it probably
means that somebody threw a warning. And in that case you probably
don't want to display a whole web page (at the bottom of the previous
web page!), but want to deal with the problem some other way.
--
Kee Hinckley - Somewhere.Com, LLC
http://consulting.somewhere.com/
I'm not sure which upsets me more: that people are so unwilling to accept
responsibility for their own actions, or that they are so eager to regulate
everyone else's.
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
