#!/usr/bin/perl.exe -w
use strict;
use XML::Simple;
use Data::Dumper;

my $ref = XMLin("./data.xml");

print Dumper($ref);
print $ref->{emp}->{name},$/;
print $ref->{emp}->{age},$/;
print $ref->{emp}->{address},$/