hallo zusammen,
ich finde einfach keine lösung für mein kleines problem. ich hoffe ihr könnt mir weiterhelfen.
ich möchte jetzt erreichen, dass die ausgabe $xml auch so wie sie ist in ein XML-Dokument geschrieben und gespeichert wird. sicherlich ziemlich simpel. hoffe ihr könnt mir helfen.
Gruß
Daniel
ich finde einfach keine lösung für mein kleines problem. ich hoffe ihr könnt mir weiterhelfen.
Code:
# Globale Variablen und Funktionen use warnings; use strict; use XML::Simple; use DBI; # Datenbank Zugangsdaten my $DB_NAME = "perl_testino"; my $DB_DSN = "DBI:Pg:database=$DB_NAME"; my $DB_USER = "***"; my $DB_PASSWD = "***"; my $db = DBI->connect($DB_DSN, $DB_USER, $DB_PASSWD) or die "Fehler bei Datenbankverbindung: $!"; my $recs = $db->selectall_arrayref('SELECT user_kdnr, user_pwd FROM public.user',{ Columns => {} }); my $xml = XMLout( {record => $recs}, NoAttr => 1 ); print "\n\n XML-Ausgabe der Datenbank: perl_testino Tabelle: user \n\n"; print $xml;
ich möchte jetzt erreichen, dass die ausgabe $xml auch so wie sie ist in ein XML-Dokument geschrieben und gespeichert wird. sicherlich ziemlich simpel. hoffe ihr könnt mir helfen.
Gruß
Daniel
Comment