#!/usr/bin/perl -w
use SOAP::Lite 'trace', 'debug';
use Data::Dumper;
$GUID = '11111111-1111-1111-1111-111111111111';
$App = 'Test';
$ST = 'YOURST';

  $s = SOAP::Lite
    -> uri('http://support.dell.com/WebServices/')
    ->on_action( sub { join '', @_ } )
    -> proxy('http://xserv.dell.com/services/assetservice.asmx')
    ;
$a = $s->GetAssetInformation(
    SOAP::Data->name('guid')->value($GUID)->type(''),
    SOAP::Data->name('applicationName')->value($App)->type(''),
    SOAP::Data->name('serviceTags')->value($ST)->type(''),
);
print "blah:". Dumper($a->result)."\n";
~