Select Code to Download

#!/usr/bin/perl
...
$Email = param('email');
$Subject = param('subject');
$Contents = param('contents');

print "Content-Type:text/html\n\n";

...
</html>

$txt->font($fnt, 8);
...
$txt->fillcolor('black');
$txt->text("$Contents");

my $Message = "
...

$msg->send;