#!/usr/local/bin/perl5.004

use XML::Parser;
use Data::Dumper;
$Data::Dumper::Indent = 1;

$p = new XML::Parser Style => 'tree';

parsefile $p 'kjv.xml';

print Dumper($p->{Tree});
