iso-8859 ausgabe - #6784 (Perl/CGI)

renee

2006-01-25 11:22

User since
2003-08-04
14371 Artikel
ModeratorIn

hier wird decode_mimewords im Array-Kontext aufgerufen (weil print eine Liste erwartet) und da wird Dein $data gesplittet (siehe Doku zu CPAN:

MIME::Words

Es muss dann so heissen:

Code: (dl )

1
2
3

foreach(decode_mimewords($data)){
  print $_;
}

oder

Code: (dl )

1
2

my $decoded = decode_mimewords($data);
print $decoded;