Thread Encode::encode in eval abfangen (20 answers)
Opened by burnersk at 2009-01-29 12:03

GwenDragon
 2009-01-29 12:27
#118470 #118470
User since
2005-01-17
14748 Artikel
Admin1
[Homepage]
user image
Code: (dl )
1
2
3
4
5
6
7
8
if ($charset && (lc($charset) ne 'utf-8')) { 
  eval { $output = encode($charset, $output); };
  croak($@) if $@;  
}
elsif ($charset && (lc($charset) eq 'utf-8')) { 
  eval { $output = encode('utf8', $output); };
  croak($@) if $@;
}


Ich würde die Dekodierung sowieso in eine eigene Funktion packen.

Aber das kannst du vielleicht auch selbst. ;)
die Drachin Gwen

Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View full thread Encode::encode in eval abfangen