sub auth { my ($class, $username, $passwd) = @_; # ... more code here }