Comentários sobre: Perl + GSM + Imaginação = Coisas Legais http://pitombera.wordpress.com/2008/06/22/perl-gsm-imaginacao-coisas-legais/ Just another weblog Tue, 09 Jun 2009 02:24:26 +0000 http://wordpress.com/ hourly 1 Por: [Dica] Nagios + SMS « Pitombera’s Weblog http://pitombera.wordpress.com/2008/06/22/perl-gsm-imaginacao-coisas-legais/#comment-84 [Dica] Nagios + SMS « Pitombera’s Weblog Tue, 09 Jun 2009 02:24:26 +0000 http://powerguide.wordpress.com/?p=19#comment-84 [...] Perl + GSM + Imaginação = Coisas Legais [...] [...] Perl + GSM + Imaginação = Coisas Legais [...]

]]> Por: pitombera http://pitombera.wordpress.com/2008/06/22/perl-gsm-imaginacao-coisas-legais/#comment-82 pitombera Sun, 07 Jun 2009 15:36:59 +0000 http://powerguide.wordpress.com/?p=19#comment-82 Problema resolvido com Alex via e-mail, novo post será criado contando a solução utilizada. Problema resolvido com Alex via e-mail, novo post será criado contando a solução utilizada.

]]> Por: Alex http://pitombera.wordpress.com/2008/06/22/perl-gsm-imaginacao-coisas-legais/#comment-76 Alex Fri, 15 May 2009 22:04:24 +0000 http://powerguide.wordpress.com/?p=19#comment-76 Nenhuma dica? Nenhuma dica?

]]> Por: Alex http://pitombera.wordpress.com/2008/06/22/perl-gsm-imaginacao-coisas-legais/#comment-75 Alex Sat, 09 May 2009 04:31:53 +0000 http://powerguide.wordpress.com/?p=19#comment-75 A por favor apague o n. do meu celular acabei colando sem querer, esqueci de dizer que estou utilizando Linux [root@localhost ~]# lsmod Module Size Used by cdc_acm 18145 0 O módulo cdc_acm já estava disponivel. [root@localhost ~]# cat /etc/redhat-release CentOS release 5.3 (Final) Kernel - 2.6.18 ----------- [root@localhost ~]# lsusb Bus 004 Device 002: ID 22b8:4902 Motorola PCS Triplet GSM Phone (AT) Bus 004 Device 001: ID 0000:0000 Bus 005 Device 001: ID 0000:0000 Bus 002 Device 001: ID 0000:0000 Bus 001 Device 001: ID 0000:0000 Bus 003 Device 001: ID 0000:0000 A por favor apague o n. do meu celular acabei colando sem querer, esqueci de dizer que estou utilizando Linux

[root@localhost ~]# lsmod
Module Size Used by
cdc_acm 18145 0

O módulo cdc_acm já estava disponivel.
[root@localhost ~]# cat /etc/redhat-release
CentOS release 5.3 (Final)
Kernel – 2.6.18

———–
[root@localhost ~]# lsusb
Bus 004 Device 002: ID 22b8:4902 Motorola PCS Triplet GSM Phone (AT)
Bus 004 Device 001: ID 0000:0000
Bus 005 Device 001: ID 0000:0000
Bus 002 Device 001: ID 0000:0000
Bus 001 Device 001: ID 0000:0000
Bus 003 Device 001: ID 0000:0000

]]> Por: Alex http://pitombera.wordpress.com/2008/06/22/perl-gsm-imaginacao-coisas-legais/#comment-74 Alex Sat, 09 May 2009 04:03:05 +0000 http://powerguide.wordpress.com/?p=19#comment-74 Ambiente é simples instalei os requisitos minimos para funcionamento do script estou utizando sem quebras de linha texto puro inclusive sem espaços ou acentuação fiz conforme o procedimento. ex de alguns testes echo “Hostname:RoteadorPlanta4-Status:Down-IP:172.16.32.1” | perl script.pl 1591111111 nem manda a mensagem. Quando quebro a mensagem para 18 caracteres a mensagem vai sem erro. No host agora [root@localhost plugins]# echo "Hostname:Tsors2k013-Status:Down" | perl moto.pl 1591111111 ok! connected and registered to network. send.log Sat May 9 00:49:16 2009 moto.pl warning ERROR in sending SMS: [root@localhost plugins]# echo "Hostname:Tsors" | perl moto.pl 1591111111 O sms chega Mostrando os warning: mais de 18 caracteres: [root@localhost plugins]# echo "Hostname:Tsors2k004-Status:Down" | perl -W -U moto.pl 1591111111 ok! connected and registered to network. Use of uninitialized value in concatenation (.) or string at /usr/lib/perl5/site_perl/5.8.8/Device/Gsm.pm line 772, line 1. Mostrando os warnings: menos de 18 caracteres: [root@localhost plugins]# echo "Hostname:Tsors2k" | perl -W -U moto.pl 1591111111 ok! connected and registered to network. Não da erro algum. Qualquer ajuda que vier ficarei agradecido. Ambiente é simples instalei os requisitos minimos para funcionamento do script
estou utizando sem quebras de linha texto puro inclusive sem espaços ou acentuação
fiz conforme o procedimento.
ex de alguns testes
echo “Hostname:RoteadorPlanta4-Status:Down-IP:172.16.32.1” | perl script.pl 1591111111
nem manda a mensagem.
Quando quebro a mensagem para 18 caracteres a mensagem vai sem erro.
No host agora
[root@localhost plugins]# echo “Hostname:Tsors2k013-Status:Down” | perl moto.pl 1591111111

ok! connected and registered to network.

send.log
Sat May 9 00:49:16 2009 moto.pl warning ERROR in sending SMS:

[root@localhost plugins]# echo “Hostname:Tsors” | perl moto.pl 1591111111

O sms chega

Mostrando os warning: mais de 18 caracteres:

[root@localhost plugins]# echo “Hostname:Tsors2k004-Status:Down” | perl -W -U moto.pl 1591111111

ok! connected and registered to network.
Use of uninitialized value in concatenation (.) or string at /usr/lib/perl5/site_perl/5.8.8/Device/Gsm.pm line 772, line 1.

Mostrando os warnings: menos de 18 caracteres:

[root@localhost plugins]# echo “Hostname:Tsors2k” | perl -W -U moto.pl 1591111111

ok! connected and registered to network.

Não da erro algum.

Qualquer ajuda que vier ficarei agradecido.

]]> Por: pitombera http://pitombera.wordpress.com/2008/06/22/perl-gsm-imaginacao-coisas-legais/#comment-73 pitombera Tue, 21 Apr 2009 02:20:13 +0000 http://powerguide.wordpress.com/?p=19#comment-73 Alex, Sinceramente não sei te informar, se não me engano o v3 testado era um v3i. O script faz uma limitação de 160 caracteres, o que não chega nem perto dos 18 caracteres que você diz( quebras de linha? ). Em relação à questão do modelo, não creio que tenha algo com o problema já que o módulo usa comandos AT para o envio de mensagens, citei apenas por ser uma diferença do ambiente testado. Seria interessante você passar mais informações( ambiente testado, o script usado, a forma como chamou o script, essas coisas ) []'s Alex,
Sinceramente não sei te informar, se não me engano o v3 testado era um v3i. O script faz uma limitação de 160 caracteres, o que não chega nem perto dos 18 caracteres que você diz( quebras de linha? ). Em relação à questão do modelo, não creio que tenha algo com o problema já que o módulo usa comandos AT para o envio de mensagens, citei apenas por ser uma diferença do ambiente testado.

Seria interessante você passar mais informações( ambiente testado, o script usado, a forma como chamou o script, essas coisas )

[]’s

]]> Por: Alex http://pitombera.wordpress.com/2008/06/22/perl-gsm-imaginacao-coisas-legais/#comment-72 Alex Wed, 15 Apr 2009 03:48:24 +0000 http://powerguide.wordpress.com/?p=19#comment-72 Por que no motorola V3re só manda SMS com 18 caracteres? Por que no motorola V3re só manda SMS com 18 caracteres?

]]> Por: Helljawz http://pitombera.wordpress.com/2008/06/22/perl-gsm-imaginacao-coisas-legais/#comment-67 Helljawz Sun, 06 Jul 2008 05:20:22 +0000 http://powerguide.wordpress.com/?p=19#comment-67 Para um adm de sistema, seria interessante receber logs pelo celular. Poderia fazer isso com o crontab. Para um adm de sistema, seria interessante receber logs pelo celular. Poderia fazer isso com o crontab.

]]> Por: redpill http://pitombera.wordpress.com/2008/06/22/perl-gsm-imaginacao-coisas-legais/#comment-66 redpill Sun, 22 Jun 2008 02:05:02 +0000 http://powerguide.wordpress.com/?p=19#comment-66 denada :) denada :)

]]>