MySQL Tabelle einlesen & ausgeben (gelöst) - #145475 (Datenbanken und Verzeichnisdienste)

kimmy

2011-02-08 16:00

User since
2010-09-10
87 Artikel
BenutzerIn
[default_avatar]

Hallo zusammen,

ich möchte folgende MySQL Tabelle einlesen

Code: (dl )

Nr | Old | New | Length
10 | AAA| Art | 100
20 | BBB | Brf | 25
30 | CCC |Txt | 35
40 | DDD |Art | 200
50 | EEE |  | 255
60 | FFF | Txt | 150

und neue Tabelle erstellen. Und die neue Tabelle soll wie folgt aussehen :

Code: (dl )

1
2
3

  Art   | Brf |   Txt
aaa ddd | bbb | ccc fff
aaa ddd | bbb | ccc fff

D.h. falls etwas in der Spalte New mehrmals vorkommt, dann werden sie miteinander verbunden und die Length wird addiert.
Und mein Perl-Skript (zum Einlesen) sieht so aus :

Code (perl): (dl )

my $search = $dbh->prepare("SELECT * FROM tblimport");
$search->execute;
my (@rec,@news);

while(@rec = $search->fetchrow_array){
        my @array = join("\t",@rec);
        foreach(@array){
                my ($id,$old,$new,$length,);
                if(/^([^\t]+)\t([^\t]+)\t([^\t]*)\t([^\t]+)$/){
                        $new = $3;
                        if($new){
                            push @news, $_;
                        }
                }
        }
}

Aber leider weiss ich nicht wie ich die neue Tabelle erstellen kann.
Könnt jemand vielleicht mir helfen.
Vielen Dank im Voraus.

modedit Editiert von pq: code-tags statt quote-tags
Last edited: 2011-02-09 12:23:20 +0100 (CET)