Encode::encode in eval abfangen - #118497 (Allgemeines zu Perl)

renee

2009-01-29 14:24

User since
2003-08-04
14371 Artikel
ModeratorIn

$@ ist ***** nicht leer!

Code: (dl )

#!/usr/bin/perl

use strict;
use warnings;
use Encode;

eval{
encode('mein_utf','test');
};

print '$@ ist nicht leer' if $@;

Code: (dl )

1
2

C:\>encode_die.pl
$@ ist nicht leer

WinXP/Perl 5.8.8

Demnächst erstmal testen bevor man auf die ****** haut...