On Thu, 31 May 2001, Craig Moynes/Markham/IBM wrote:
> unless(open(LOG,">$logfile")) {
> print "Content-type: text/html\n\n";
> print "Couldn't open $logfile. $!\n";
> print "At $date, $ENV{'REMOTE_HOST'} couldn't enter the site.";
> exit;
Actually, if you use the CGI:Carp module (and import fatalsToBrowser), you
can reduce this to a single line:
use CGI::Carp qw(fatalsToBrowser);
...
...
open LOG, ">$logfile"
or die "Couldn't open logile $logfile: $!<br>At date, $ENV{REMOTE_HOST} couldn't
enter the site <br>";
-- Brett
Brett W. McCoy
Software Engineer
Broadsoft, Inc.
240-364-5225
[EMAIL PROTECTED]
