entfernen von sonderzeichen u. andere symbole (gelöst) - #175009 (Allgemeines zu Perl)

bianca

2014-04-25 10:29

User since
2009-09-13
7016 Artikel
BenutzerIn

user image

Ich würde sie nach dem Einlesen in das Modul CPAN:

Encode schicken, ungefähr so:

Code (perl): (dl )

1
2

use Encode qw(decode encode_utf8);
my $data = decode "UTF-8", $eingelesen;

dann Regex'en
und später bei der Ausgabe das zurück konvertieren nicht vergessen:

Code (perl): (dl )

print $fh encode_utf8 $data;

10 print "Hallo"
20 goto 10