Select Code to Download

#!e:/Perl/bin/Perl.exe -w
use strict;
...

my $xml = XMLin( shift );
print Dumper( $xml );

C:\test>test.pl C:\test\test.xml
Content-type: text/html
...
[Tue Jun 18 15:01:24 2002] C:\test\test.pl:
[Tue Jun 18 15:01:24 2002] C:\test\test.pl: not well-formed at line 46
+, column 20, byte 1554 at E:/Perl/site/lib/XML/Parser.pm line 168
C:\test>