Thread Encode::encode in eval abfangen
(20 answers)
Opened by burnersk at 2009-01-29 12:03
Hallo,
ich möchte Encode::encode mit eval abfangen um die Fehlermeldungen nicht meinem Modul zuzuweisen sondern dem Script, welches mein Modul eingebunden hat. Also: - script.pl - > module.pm - - > Encode.pm Bei falschem Charset bekommt module.pm die Fehlermeldung. Es soll aber per Carp::croak an script.pl weitergeleitet werden. aktueller (nicht funktionierender) Aufbau: Code (perl): (dl
)
1 2 if ($charset && (lc($charset) ne 'utf-8')) { if (!eval { $output = encode($charset, $output); }) { croak($!); } } elsif ($charset && (lc($charset) eq 'utf-8')) { if (!eval { $output = encode('utf8', $output); }) { croak($!); } } |