tcp - Simple SMPP Perl Script -
i need help/advices on short script wrote in perl in order send sms via smpp protocol.
i got sms gateway working (sending sms via html request or via web interface works), let's gateway has ip 192.168.1.15. smpp service listening tcp 2775 (i can telnet 2775, guess smpp service working on sms gateway)
my $smpp = net::smpp->new_transmitter(192.168.1.15, port=>2775, system_id =>"administrator", password =>"passwdexample") or die; $resp_pdu = $smpp->submit_sm(destination_addr => '+400123456789', short_message => 'test message') or die; die "response indicated error: " . $resp_pdu->explain_status() if $resp_pdu->status;
when run script, here error got :
response indicated error: incorrect bind status given command (esme_rinvbnds ts=0x00000004) @ c:\temp\smpptest.pl line .
unfortunately, haven't find on internet, according link : smpp errors codes says :
you must bind first before other request handled.
however, bind done new_transmitter, , don't errors @ point, don't understand how cannot bind tcp session (my credentials corrects, tried in telnet session).
that's first time use such plugin, maybe i'm missing something, , maybe has met error !
many :-)
try quote ip address:
net::smpp->new_transmitter("192.168.1.15", ...);
Comments
Post a Comment