Ohhh hold on, I get it. In my Subroutine in the perl module, it needs to be...

    ...
    my ($self, $server, $user, $pass) = (@_);
    ...
[download]

Ill try that tomorrow at work and let you know how it goes