A random picture ]]> 0 #### #!/usr/bin/env perl use strict; use warnings; use XML::Simple; use Data::Dumper; my $ref = XMLin(\*DATA); print Dumper $ref; __DATA__ A random picture ]]> 0 #### $VAR1 = { 'argument' => [ '', '0' ], 'name' => 'showImage', 'data' => 'A random picture' };