Code: Select all
#!/usr/local/bin/perl
use XML::Simple;
my $ref = XMLin('foo.xml');
#also with my $ref = XMLin();
use Data::Dumper;
print Dumper($config);
print $config->{logdir};Code: Select all
<config logdir="/var/log/foo/" debugfile="/tmp/foo.debug">
<server name="sahara" osname="solaris" osversion="2.6">
<address>10.0.0.101</address>
<address>10.0.1.101</address>
</server>
<server name="gobi" osname="irix" osversion="6.5">
<address>10.0.0.102</address>
</server>
<server name="kalahari" osname="linux" osversion="2.0.34">
<address>10.0.0.103</address>
<address>10.0.1.103</address>
</server>
</config>$VAR1 = undef;
Why is that, it doesn't match the one with from the web.