my @result = $xmpp->AuthSend(username => $username,
                               password => $password,
                               resource => 'TestClient_'.$VERSION);

  unless ($result[0] eq 'ok')