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


my $stuff=XMLin();


print Dumper($stuff);