Help for this page
#!/usr/bin/perl ... my $str = "Wir freuen uns, dass Sie den 1&1 E-Mail-Service f=C3=BCr Ih +re=20"; say decode('MIME-Header', "=?iso-8859-1?Q?" . $str . "?=");
$ perl 1092761.pl Wir freuen uns, dass Sie den 1&1 E-Mail-Service für Ihre $