#!/usr/bin/perl

# use module
use XML::Simple;
use Data::Dumper;

# create object
$xml = new XML::Simple (KeyAttr=>[]);

# read XML file
$data = $xml->XMLin("hosts.xml");

foreach $e (@{$data->{host}})
{
        print $e->{name}, "\n";
        print $e->{function}, "\n";
}