Net :: SMPP连接超时

时间:2016-05-05 06:43:02

标签: perl

我正在尝试与SMSC实现绑定,但我一直收到超时错误。与SMSC的连接是通过VPN隧道实现的。我确认我可以从命令行telnet到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.xx.xx:[2038]:连接在smpp_client.pl第14行超时。

可能是超时错误的原因是什么?

1 个答案:

答案 0 :(得分:0)

最后解决了这个问题。

显然Net :: SMPP-> new_transceiver在提供主机和端口以外的参数时不喜欢它。

以下工作正常:

#!/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"; }