I've been able to get dbman to insert line breaks in a textarea field through the help of the forums, however, when it e-mails the contents of the record it inserts the < br> tags. Here is the mail portion of html.pl
my (%rec) = &get_record($in{$db_key});
$message=qq|
Show Date: $rec{'Show Date'}
Source: $rec{'Source'}
Review:
$rec{'Review'}
$rec{'Reviewed By'}'s vote: $rec{'Your Vote'}|;
open (MAIL, "$mailprog") || &cgierr("Can't start mail program");
print MAIL "To: $group_email\n";
print MAIL "From: $group_email2\n";
print MAIL "Subject: $rec{'Show Date'} Review\n\n";
print MAIL "The following new review has been added by $rec{'Reviewed By'} to the $html_title:
$message.\n\n";
foreach $col ($db_cols) {
print MAIL "$col -- $rec{$col}\n";
}
close (MAIL);
$page_title = "Record Added";
&html_page_top;
# < -- Start page text -- >
print qq|
<P><$font><$font_color2>The following record was successfully added to the database:</FONT>
|;
# < -- End page text -->
&html_record_long(&get_record($in{$db_key}));
&html_footer;
&html_page_bottom;
}
I've tried many suggestions on the forum but I can't get it to work.
Thanx
Mike
my (%rec) = &get_record($in{$db_key});
$message=qq|
Show Date: $rec{'Show Date'}
Source: $rec{'Source'}
Review:
$rec{'Review'}
$rec{'Reviewed By'}'s vote: $rec{'Your Vote'}|;
open (MAIL, "$mailprog") || &cgierr("Can't start mail program");
print MAIL "To: $group_email\n";
print MAIL "From: $group_email2\n";
print MAIL "Subject: $rec{'Show Date'} Review\n\n";
print MAIL "The following new review has been added by $rec{'Reviewed By'} to the $html_title:
$message.\n\n";
foreach $col ($db_cols) {
print MAIL "$col -- $rec{$col}\n";
}
close (MAIL);
$page_title = "Record Added";
&html_page_top;
# < -- Start page text -- >
print qq|
<P><$font><$font_color2>The following record was successfully added to the database:</FONT>
|;
# < -- End page text -->
&html_record_long(&get_record($in{$db_key}));
&html_footer;
&html_page_bottom;
}
I've tried many suggestions on the forum but I can't get it to work.
Thanx
Mike

