Help for this page
subject message to
package PL::Mail; use strict; ... print STDERR "Error sending mail ($date): $!"; } }
my $obj = PL->new; $obj->Mail->send( ... subject => 'Comments from ' . $q->param('name'), message => $msg );