#!/usr/bin/env perl
use strict;
use warnings;
use XML::Fast;
use Data::Dumper;
my $xml = '12';
my $xml_hash = xml2hash $xml;
print Dumper($xml_hash),$/;
$xml = '';
$xml_hash = xml2hash $xml;
print Dumper($xml_hash),$/;
$xml = '';
$xml_hash = xml2hash $xml;
print Dumper($xml_hash),$/;