use strict; use DBI; use XML::Generator::DBI; use XML::XPath; use XML::XPath::Builder;