use DBI;
my $dbh = DBI->connect('dbi:AnyData(RaiseError=>1):');

$dbh->func(
          'catalog', #alias
          'XML', #format of input
          'catalog.xml', #source
 {col_names=>'product,catalog_item,item_number,price,size,color_swatch'},
          'ad_catalog' #
         );

my $sth = $dbh->prepare("SELECT * FROM catalog");

$sth->execute();

while (my $row = $sth->fetch) {
       print "@$row  \n";
         }

##</code><code>##

<?xml version="1.0"?>
<?xml-stylesheet href="catalog.xsl" type="text/xsl"?>
<!--<!DOCTYPE catalog SYSTEM "catalog.dtd">-->
<catalog>
  <product description="Cardigan Sweater"
product_image="cardigan.jpg">
     <catalog_item gender="Men's">
        <item_number>QWZ5671</item_number>
        <price>39.95</price>
        <size description="Medium">
           <color_swatch image="red_cardigan.jpg">Red</color_swatch>
           <color_swatch image="burgundy_cardigan.jpg">Burgundy</
color_swatch>
        </size>
        <size description="Large">
           <color_swatch image="red_cardigan.jpg">Red</color_swatch>
           <color_swatch image="burgundy_cardigan.jpg">Burgundy</
color_swatch>
        </size>
     </catalog_item>
     <catalog_item gender="Women's">
        <item_number>RRX9856</item_number>
        <price>42.50</price>
        <size description="Small">
           <color_swatch image="red_cardigan.jpg">Red</color_swatch>
           <color_swatch image="navy_cardigan.jpg">Navy</
color_swatch>
           <color_swatch image="burgundy_cardigan.jpg">Burgundy</
color_swatch>
        </size>
        <size description="Medium">
           <color_swatch image="red_cardigan.jpg">Red</color_swatch>
           <color_swatch image="navy_cardigan.jpg">Navy</
color_swatch>
           <color_swatch image="burgundy_cardigan.jpg">Burgundy</
color_swatch>
           <color_swatch image="black_cardigan.jpg">Black</
color_swatch>
        </size>
        <size description="Large">
           <color_swatch image="navy_cardigan.jpg">Navy</
color_swatch>
           <color_swatch image="black_cardigan.jpg">Black</
color_swatch>
        </size>
        <size description="Extra Large">
           <color_swatch image="burgundy_cardigan.jpg">Burgundy</
color_swatch>
           <color_swatch image="black_cardigan.jpg">Black</
color_swatch>
        </size>
     </catalog_item>
  </product>
</catalog>