Initial commit.

diff --git a/parse.pl b/parse.pl
new file mode 100644 (file)
index 0000000..0f04462
--- /dev/null
+++ b/parse.pl
@@ -0,0 +1,8 @@
+#!/usr/bin/perl -w
+
+use XML::Parser;
+
+my $in_file = "/home/a_and_s/Budget/A and S United";
+
+$parser = XML::LibXML->new();
+$doc = $parser->parse_file( $in_file );