view release on metacpan or  search on metacpan

CodeRed.pm  view on Meta::CPAN

    {
	$r->warn("CodeRed: Mail::Sendmail returned '$Mail::Sendmail::error'.  Exiting.");
	return DECLINED;
    }
}

# All modules must return a true value
1;

__END__
# Below is stub documentation for your module. You better edit it!

=head1 NAME

    Apache::CodeRed - Responds to CodeRed worm attacks with e-mail warnings

=head1 SYNOPSIS

    In your httpd.conf, put the following:

	PerlModule	Apache::CodeRed