programming-examples/perl/SystemFunction/Using Data-Dumper to serialize the structure of a tree of XML document.pl

use XML::Parser;

$parser = new XML::Parser( Style => 'Tree' );
my $tree = $parser->parsefile( shift @ARGV );

# serialize the structure
use Data::Dumper;
print Dumper( $tree );