Help for this page
#!/usr/bin/perl.exe -w use strict; use XML::Simple; ... print $ref->{emp}->{name},$/; print $ref->{emp}->{age},$/; print $ref->{emp}->{address},$/
<profile> <emp> <name>Mahesh</name> ... <desig>Developer</desig> </emp> </profile>
$ ./script.pl $VAR1 = { 'emp' => { ... 24 New york