#!/usr/bin/perl -w

use strict;
use warnings;
use XML::Parser;

my $xml;
my $results;
 
$xml = new XML::Parser(Style => 'Debug');
$xml->parsefile('info.xml');

$xml->parse('<attribute Name="Column_Type" >F635 Median</attribute>');