SQL Ergebnisse in Textdatei - #140420 (Datenbanken und Verzeichnisdienste)

renee

2010-08-06 11:35

User since
2003-08-04
14371 Artikel
ModeratorIn

Statt

Code (perl): (dl )

1
2
3

open(OUT, ">D:\\SQL_INHALT.txt");
print OUT $sth;
close(OUT);

musst Du in einer Schleife die Ergebnisse holen und in die Datei schreiben:

Code (perl): (dl )

open my $out, ">", "D:\\SQL_INHALT.txt" or die $!;
while ( my @row = $sth->fetchrow_array ) {
    print $out join ";", @row;
}
close $out;

Du musst Dir halt noch überlegen, wie die Daten aussehen sollen, wenn sie in die Datei geschrieben werden. Hier habe ich die einzelnen Felder einfach mit ";" getrennt.

Noch eine Anmerkung zu Deinem open: Du solltest unbedingt Fehlerbehandlung machen. Was, wenn die Datei nicht geöffnet werden kann? Es ist auch praktischer, lexikalische Filehandles zu nehmen (siehe auch diesen Wiki:

Artikel).

Mehr zu dem 3-Arg-Open findest Du unter http://reneeb-perlblog.blogspot.com/2009/09/versch...

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/