The XML::Parser "Debug" Style
use XML::Parser;

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

parsefile $p 'Beginning.xml';
=========================================
tstmt \\ ()
tstmt ttitle \\ ()
tstmt ttitle || The Old Testament
tstmt ttitle //
tstmt || #10;
tstmt fm \\ ()
tstmt fm || #10;
tstmt fm p \\ ()
tstmt fm p || Source of original ASCII files unknown.
tstmt fm p //
tstmt fm || #10;
tstmt fm p \\ ()
tstmt fm p || SGML markup by Jon Bosak, 1992-1994.
tstmt fm p //
tstmt fm || #10;
tstmt fm p \\ ()
tstmt fm p || XML version by Jon Bosak, 1996-1998.
tstmt fm p //
tstmt fm || #10;
tstmt fm p \\ ()
tstmt fm p || This work may be freely distributed internationally.
tstmt fm p //
tstmt fm || #10;
tstmt fm //
tstmt || #10;
tstmt book \\ (title Genesis)
tstmt book || #10;
tstmt book bktlong \\ ()
tstmt book bktlong || The First Book of Moses, Called GENESIS.
tstmt book bktlong //
tstmt book || #10;
tstmt book chapter \\ (n 1)
tstmt book chapter || #10;
tstmt book chapter v \\ (n 1)
tstmt book chapter v p \\ ()
tstmt book chapter v p || In the beginning God created the heaven and the earth.
tstmt book chapter v p || #10;
tstmt book chapter v p //
tstmt book chapter v //
tstmt book chapter || #10;
tstmt book chapter //
tstmt book || #10;
tstmt book //
tstmt || #10;
tstmt //
Title Page Road Map Who Am I? Where To Get This Talk What is Markup? Three Kinds of Markup No Markup Procedural Markup Descriptive Markup On Markup Why Descriptive Markup is Good For You What is XML? This Isn't XML This is Well-Formed XML This is Valid XML Valid XML, but Better XML: History and Politics XML: Design Goals XML From 50,000 Feet Where to Find Out About XML XML Terminology 1 XML Terminology 2 How Does Unicode Work? The Unicode Spectrum Unicode for Programmers Unicode and XML Why Should You Use XML? Recently I Set Up a Linux Box Recently I Set up a Linux Box Recently I Set Up a Linux Box Recently I Set Up a Linux Box Recently I Set Up a Linux Box Recently I Set Up a Linux Box About Syntax Why is the Web So Slow? Today's Browser Architecture The Document Object Model The Next-Gen Browser Metadata Model + XML Syntax = RDF Who Loves XML? How Can You Use XML in Perl? The expat XML Processor The XML::Parser Package Some Test Data The XML::Parser The XML::Parser The XML::Parser The XML::Parser The XML::Parser Some Larger Test Data The The The The The The The The The And A Parting Question Match? Match? Match? Match? Match? Match?