CGI/Perl Guide | Learning Center | Forums | Advertise | Login
Site Search: in

  Main Index MAIN
Search Posts SEARCH
Who's Online WHO'S
Log in LOG

Home: Perl Programming Help: Beginner:
Extend Email Form


New User

Nov 21, 2011, 11:15 AM

Post #1 of 1 (363 views)
Extend Email Form Can't Post

Hi there,
I`m a Perl-Newbee try to extend an existing perl script. Could anybody help me please?
The script send an email text by a form. I want to add a field to the form and attach the text to the email.

---------- Form Var 1
$emailtextLabel='your text';
$emailtextBox='<input name="et" type="text" size=24 maxlength=255>';

---------- Form Var 2
$emailtextLabel='your text';
$emailtextBox='<textarea name="et" rows=2 cols=15 maxlength=255></textarea>';

==> Both Variations add the new field to the form. So this part works. But how can I add now the text to the email?

sub notify{
my ($title)=@_;
my ($et)=param("et");
if (... snip ...)
print MAIL "Subject: $title \n";
print MAIL (... snip...)
print MAIL "\n$et\n";

The code has been abridged here to make it easier to understand.
These twor rows are my part:
my ($et)=param("et");
print MAIL "\n$et\n";
and of course ist doesn't work. What am I doing wrong? What can I do to add the text to a variable to add it to the email?

Thanks :-)


Search for (options) Powered by Gossamer Forum v.1.2.0

Web Applications & Managed Hosting Powered by Gossamer Threads
Visit our Mailing List Archives