Net::SMPP连接超时

Question

我试图实现一个绑定与SMSC，但我不断得到一个超时错误。与SMSC的连接通过VPN隧道进行。我确认我可以从命令行将get告诉SMSC，但是从下面的perl脚本中得到一个超时错误：

#!/usr/bin/perl
use Net::SMPP;
use warnings;

$host = 'xx.xx.xx.xx';
$port = "2038";
$system_id = "SSEMA";
$password = "SSEMA";

my $smpp = Net::SMPP->new_transmitter($host, Port=>$port,
    system_id => $system_id,
    password => $password,
    enquire_interval => 1500000) or die "Could not connect to $host :     [$port] : $!";

if($smpp){ print "Connected ok! \n"; }

root@heisenberg:/var/www/html/glomagic# perl smpp_client.pl无法连接到xx.xx: 2038 : smpp_client.pl行14行超时的连接。

超时错误的原因是什么？

Answer 1

最后解决了这个问题。

显然，Net：：SMPP->new_收发信机不喜欢提供主机和端口以外的参数。

以下内容运作得很好：

#!/usr/bin/perl
use Net::SMPP;
use warnings;

$host = 'xx.xx.xx.xx';
$port = "2038";
$system_id = "SSEMA";
$password = "SSEMA";

my $smpp = Net::SMPP->new_transceiver($host, port => $port)
    or die "Could not connect to $host : [$port] : $!";

if($smpp){ print "Connected ok! \n"; }