#!/usr/bin/perl

use SOAP::Lite;# +trace => qw(debug);

my $service = SOAP::Lite->service('http://hal.archives-ouvertes.fr/ws/ref.php?wsdl');

my $result = $service->getRefInstance();

use Data::Dumper;
print Dumper($result);

print $result->result,"\n";