use XML::Simple;

my $config = XMLin();

print $config->{username};