view release on metacpan or  search on metacpan

cgi-bin/comments.cgi  view on Meta::CPAN

use POSIX qw(strftime);


#
#  The directory to store comments in
#
#  In this case ~/comments/
#
my $COMMENT = $ENV{ 'DOCUMENT_ROOT' } . "../comments/";

#my $COMMENT = (getpwuid $>)[7]  . "/comments";


#
#  The notification addresses - leave blank to disable
#
my $TO   = 'weblog@steve.org.uk';
my $FROM = 'weblog@steve.org.uk';


#