Hi Bill, bryan et al:-
use XML::LibXML();
use FileHandle;
use Data::Dumper;
my $parser = XML::LibXML->new();
my $doc = $parser->parse_string(<<'EOT');
<some-xml/>
EOT
$file = 'C:\Documents and Settings\jenson.samuel\Desktop\js\test.xml';
my $fh = new FileHandle($file) || die("cant load $file : " . $!);
my $configdom = $parser->parse_fh($fh);
print "\n\n\$configdom = $$configdom\n";
my $root = $configdom->documentElement;
print "\n\n\$root = $$root\n";
O/p is:-
C:\Documents and Settings\jenson.samuel\Desktop\js>perl tie.pl
$configdom = 33360100
$root = 45715252
what are these nos??? what do they indicate///??
Thnks,
Ukh
---------------------------------
Choose the right car based on your needs. Check out Yahoo! Autos new Car
Finder tool._______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
