Formulartext per CGI Script in angenehm lesbares Format bringen

[Peter Squentz]

Hat jemand ein Script, das die lästigen Zusatzzeichen und Ä/Ö/Ü Umschreibungen aus dem ins Formular eingetragenen Text nimmt, bevor es als mail verschickt wird?

#!/usr/bin/perl -w
use strict;
use CGI ':standard';
print header, param('text');

Na, hier wird aber nicht per Mail verschickt. Man koennte es so loesen (exemplarisch und ungetestet):

#!/usr/local/bin/perl -w
use strict:
use CGI ':standard';
open MAIL, "/usr/lib/sendmail  -oi -t -odq" or die "sendmail: $!";
print MAIL <<_;
From: [e-mail]
To: [e-mail]
Subject: Formulardaten

_
print MAIL map "$_ -> @{[param $_]}\n", param;
close MAIL or die "closing sendmail: $!"

Peter