Trace OTRS TicketSearch Request

otrs-ticket-search.pl

use v5.10;
use strict;
use warnings;

use SOAP::Lite (+trace => "all");

my $proxy = "https://domain/otrs/rpc.pl";
my $soap = SOAP::Lite->new(proxy => $proxy);

my ($user, $pw) = (qw/foo bar/);

$soap->uri("/Core");

my @arg = (
    SOAP::Data->new(name => "Username",     value => $user),
    SOAP::Data->new(name => "Password",     value => $pw),
    SOAP::Data->new(name => "Object",       value => "TicketObject"),
    SOAP::Data->new(name => "Method",       value => "TicketSearch"),
    SOAP::Data->new(name => "Param1_Name",  value => "TicketID"),
    SOAP::Data->new(name => "Param1_Value", value => "561141"),
);

my $som = $soap->call("Dispatch", @arg);
if ($som->fault) {
    die $som->faultstring;
}
else {
    say $som->result;
}

written to answer to What is the XML for a valid OTRS-TicketSearch request