Hi,
On Aug 27 22:14, Guus Sliepen wrote:
> On Wed, Aug 27, 2008 at 10:37:11PM +0400, Alexander Galanin wrote:
>
> > sendxmpp does not work:
> >
> > $ echo test | sendxmpp -u user -j server.example.com -p secret -v
> > [EMAIL PROTECTED]
> > Use of uninitialized value in concatenation (.) or string at
> > /usr/share/perl5/Net/XMPP/Connection.pm line 132.
> > Use of uninitialized value in string eq at
> > /usr/share/perl5/XML/Stream.pm line 730.
> > Could not connect to server 'server.example.com':
>
> Well of course sending a message to "server.example.com" does not work, that
> server does not exist. Is it just this exact command that fails, or does it
> also fail to send messages to real, existing Jabber servers?
This fails with that error message for real servers too.
The problem could be in xmpp_login():
my @res;
my $arghash = {
hostname => $host,
tls => $tls,
connectiontype => 'tcpip',
componentname => $comp,
};
$arghash->{port} = $port if (!$port);
if (!$port) {
@res = $cnx->Connect(%$arghash);
Shouldn't this be more like this?
$arghash->{port} = $port if ($port);
Anyway, after changing this, sendxmpp seems to run fine
$ echo test | sendxmpp -v -u <user> -p <pass> -j <server> <recipient>
sendxmpp: Connect: 1
sendxmpp: AuthSend: ok
sendxmpp: MessageSend
sendxmpp: Disconnect
but i never received the message..
Regards,
Andreas
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
