use strict;
use warnings;
use Data::Dumper;
use XML::Simple;
my $res = "
First article.
";
my $res2 = "
Football.png
Second article.
";
my $result = XMLin($res);
my $result2 = XMLin($res2);
print Dumper $result;
print Dumper $result2;
####
$VAR1 = {
'binding' => {
'literal' => {
'content' => 'First article. ',
'xml:lang' => 'en'
},
'name' => 'description'
}
};
$VAR1 = {
'binding' => {
'image_url' => {
'uri' => 'Football.png'
},
'description' => {
'literal' => {
'content' => 'Second article.',
'xml:lang' => 'en'
}
}
}
};