Select Code to Download

my $result = SOAP::Lite
    -> uri('http://www.example.com/Protected')
    -> proxy('http://www.example.com/soap.cgi')
    -> fetchdata($name, $pass, @request)
    -> result;

package Protected;
sub fetchdata {
...
    #check the $name and $pass and process @request
    # or send an response indicating authentication error
}