#!/usr/bin/perl
use warnings;
use SOAP::Lite;
use HTTP::Cookies;

my $cookie = HTTP::Cookies->new();
$cookie->set_cookie(undef,'WALOGIN','foo@bar.com','/','localhost',80,1,1,100,0);

my $soap = SOAP::Lite
    -> uri('http://localhost/emailfind')
    -> proxy(
        'http://localhost/cgi-bin/soapdish2.pl',
    );

my $res = $soap->findingit($cookie);
print $res->result,"\n";