Processing XML with Perl | ![]() |
Michel Rodriguez |
![]() XML::Writer (cont'd) |
![]() |
![]() DBIx::XML_RDB (cont'd) |
DBIx::XML_RDB (theoryx5.uwinnipeg.ca/CPAN/data/DBIx-XML_RDB/XML_RDB.html) - Perl extension for creating XML from existing DBI datasources. DBIx::XML_RDB comes with the sql2xml tool which simply dumps a table in a database to an XML file.
use DBIx::XML_RDB; my $xmlout = DBIx::XML_RDB->new($datasource, "ODBC", $userid, $password, $dbname) || die "Failed to make new xmlout"; $xmlout->DoSql("select * from MyTable"); print $xmlout->GetData; |
![]() XML::Writer (cont'd) |
![]() |
![]() DBIx::XML_RDB (cont'd) |