This ought to be a FAQ if it ain't already.

MIME::Lite is your friend.

#!/usr/bin/perl -w
use strict;
use CGI;
use CGI::Carp qw/ fatalsToBrowser /; # but never in
                                     # production
use MIME::Lite;

my $q=new CGI;
my @contents=();

foreach my $key($q->param) {
      # There is a problem with this code, I'll explain
      # later.
    push @contents,sprintf("%s = %s",$key,$q->param($key));
}

my $mail=new MIME::Lite (
                          From => 'me@here.com',
                          To => 'you@there.com',
                          Subject => 'contents of my form',
                          Type => "TEXT",
                          Data => join("\n",@contents)
             );

MIME::Lite->send("smtp","my.smtphost.com",120);

$mail -> send;
[download]

For more information on what is going on there check out MIME::Lite's man page.

Caveats

First off I broke all of my rules with this example in that I do no error checking anywhere. Secondly, if your CGI parameters have multiple values then my code above will break. I leave the solution to that as an intellectual excersize for you to solve.

Another potential problem with the code above is the use of CGI::Carp qw / fatalsToBrowser/. This is a potential information leak for hackers if you use that in production and they manage to make your code break.

I dashed this off as I am about to be late for a meeting, but there is the nucleus of a solution for you.

---

Peter L. Berghold	Brewer of Belgian Ales
Peter@Berghold.Net	www.berghold.net
Unix Professional

---

---

Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!

Titles consisting of a single word are discouraged, and in most cases are disallowed outright.

Read Where should I post X? if you're not absolutely sure you're posting in the right place.

Please read these before you post! —

• How do I compose an effective node title?
• How do I post a question effectively?
• Markup in the Monastery

Posts may use any of the Perl Monks Approved HTML tags:

a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr

You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)

	For:		Use:
	&		&
	<		&lt;
	>		&gt;
	[		&#91;
	]		&#93;

Link using PerlMonks shortcuts! What shortcuts can I use for linking?

See Writeup Formatting Tips and other pages linked from there for more info.