Perl, DBI, FasCGI und das verfluchte UTF8 (gelöst) (Datenbanken und Verzeichnisdienste)

[thread]17975[/thread]

Perl, DBI, FasCGI und das verfluchte UTF8 [gelöst]

Tags: perl5 FastCGI utf-8 Ähnliche Threads

Leser: 26

Articles: hide open all | hide show old branches

+7 replies
Magic

2012-12-10 21:14
User since
2003-09-30
91 Artikel
BenutzerIn
Hallo Zusammen,
ich habe ein ganz großes Problem mit DBI/CGI und UTF-8. Ich habe ein Script (CMS), das funktionierte immer einwandfrei mit UTF-8 zurechtkam. Die Datenbanken und auch die Ein- und Ausgabe waren alle sauber UTF-8 kodiert und wurden einwandfrei angezeigt und in die DB geschrieben.

Nach Umstellung auf FastCGI, eigentlich ja nur eine zusätzliche Schleife, funktioniert da irgendwas, irgendwie gar nicht mehr. Die Daten werden zwar aus der DB richtig ausgelesen und auch im Browser korrekt ausgegeben, aber ich bekomms nicht hin, dass Daten, die ich über ein Formular (CMS-System) in die Datenbank schreibe, dort auch UTF8-kodiert ankommen. Das Script schreibt die Umlaute immer als Kauderwelsch in die DB.

Ich habs zwischendurch mal geschafft, dass die Umlaute richtig in der DB landen, dafür war aber dann die Umlaut-Ausgabe im Browser defekt.

Hier mal ein paar relevante Auszüge aus dem Script:

Das Script beginnt wie folgt:
Code: (dl )

1 2 3 4 5 6 7

use utf8; use open ':encoding(UTF-8)'; use open ':std'; use CGI::Fast qw(:standard -utf8); use FCGI();
Habs auch schon mit "$CGI::PARAM_UTF8 = 1;" innerhalb des fcgi-loops versucht... brachte aber auch nix.

Die Datenbankverbindung wird wie folgt aufgebaut:
Code: (dl )

1 2 3 4 5 6 7 8 9

my $options = { RaiseError => 1, AutoCommit => 1, mysql_enable_utf8 => 1 }; $dbh = DBI->connect( "dbi:mysql:$db{dbname};$db{hostext}", $db{username}, $db{password}, $options ) || die 'Can´t connect to MYSQL-Server. '.$!; #$dbh->do("set character set utf8"); $dbh->do("set names utf8");
Wie gern im Inet vorgeschlagen, jede einzelne Eingabe mit encode zu encodieren und dann erst in die DB zu schreiben ist keine Option, da das Script an die 10.000 Zeilen hat. Das dauert einfach zu lang.
Ausserdem hats ja ohne FastCGI funktioniert *heul

Bin für jeden Hinweis dankbar.

Grüße,
Stefan
Ein Weiser gibt nicht die richtigen Antworten, sondern er stellt die richtigen Fragen.
- +6 replies
- Muffi
  
  2012-12-11 08:47
  
  User since
  2012-07-18
  1465 Artikel
  BenutzerIn
  
  Wie teilst du denn dem Browser mit welcher Charset kommt?
  1 + 1 = 10
  - +5 replies
  - Magic
    
    2012-12-11 09:50
    User since
    2003-09-30
    91 Artikel
    BenutzerIn
    
    Über den header:
    
    Code: (dl )
    
    print header( -charset=> 'utf-8' );
    
    Die Ausgabe klappt aber auch einwandfrei. Probleme hab ich nur beim schreiben in die DB.
    
    Grüße,
    Stefan
    Ein Weiser gibt nicht die richtigen Antworten, sondern er stellt die richtigen Fragen.
    - +4 replies
    - Muffi
      
      2012-12-11 09:59
      
      User since
      2012-07-18
      1465 Artikel
      BenutzerIn
      
      Wenn der Browser den charset nicht bestimmen kann kann ziemliches random rauskommen beim Anzeigen und wieder abschicken.
      
      Was passiert denn, wenn du die erhaltenen Daten nicht in die DB schreibst, sondern wieder raus auf die Seite?
      1 + 1 = 10
      - +2 replies
      - Magic
        
        2012-12-11 10:08
        
        User since
        2003-09-30
        91 Artikel
        BenutzerIn
        
        Wenn ich die Eigabe direkt mit utf-header ausgebe ist alles korrekt angezeigt.
        
        Code: (dl )
        
        1 2
        
        print header( -charset=> 'utf-8' ); print $name;
        
        Ein Weiser gibt nicht die richtigen Antworten, sondern er stellt die richtigen Fragen.
        
        Magic
        
        2012-12-11 17:06
        
        User since
        2003-09-30
        91 Artikel
        BenutzerIn
        
        Puh,
        habs geschafft dass alles richtig funktioniert. Durch hinzufügen von
        use encoding 'utf8';
        
        in Verbindung mit
        
        use CGI::Fast qw(:standard -utf8);
        mysql_enable_utf8 => 1
        und
        $dbh->do("set character set utf8");
        $dbh->do("set names utf8");
        
        funktioniert die Ein- und Ausgabe nun endlich korrekt. Ich verstehe nicht, warum Perl und die Module so viele Probleme mit UTF-8 produzieren, bzw. warum das Ganze nicht endlich mal vernünftig und einfach in Perl integriert wird.
        
        Grüße,
        Stefan
        Ein Weiser gibt nicht die richtigen Antworten, sondern er stellt die richtigen Fragen.
      - Magic
        
        2012-12-11 16:33
        
        User since
        2003-09-30
        91 Artikel
        BenutzerIn
        
        So, habe noch ein wenig rumprobiert und konnte schon einmal folgendes feststellen:
        Wenn ich $dbh->do("set names utf8"); einstelle funktioniert die Eingabe der Daten in die Datenbank. Die Umlaute werden korrekt in die Datenbank geschrieben, also es stehen auch Ä Ö Ü drin, allerdings ist die Ausgabe im Browser zerschossen. Als Ausgabe erhalte ich z.B. folgendes:
        
        Code: (dl )
        
        PrÃ¼fungen 2012
        
        Lasse ich "set names utf8" weg, ist die Ausgabe im Browser korrekt:
        
        Code: (dl )
        
        Prüfungen 2012
        
        aber in die Datenbank wird
        
        Code: (dl )
        
        PrÃ¼fungen 2012
        
        eingetragen.
        
        Die Datenbank hat für als Standard utf8_general_ci eingestellt. Alle Tabellen haben utf8_general_ci in den Textspalten eingestellt.
        
        Ich verzweifel hier noch.
        
        Grüße,
        Stefan
        Ein Weiser gibt nicht die richtigen Antworten, sondern er stellt die richtigen Fragen.

View all threads created 2012-12-10 21:14.