O em Perl funciona sim, com as ressalvas do email anterior adapte o dial com a string de discagem para as rotas q atendam sua necessidade para sua empresa !!
[]'s Eng Eder de Souza Em 25 de maio de 2010 12:16, sergio <ser...@inbox.com> escreveu: > O script em Perl funciona ? > > > -----Original Message----- > *From:* eder.so...@bsd.com.br > *Sent:* Tue, 25 May 2010 09:17:12 -0300 > *To:* asteriskbrasil@listas.asteriskbrasil.org > *Subject:* Re: [AsteriskBrasil] RES: portabilidade > > Esta errado de novo !! vc esta mandando discar para o vazio > > sua linha tem q ser parececida com esta > $AGI->exec("Dial","DGV/g1/$num_saida|10"); > > Mais uma vez cada um tem um cenário diferente eu só postei a essencia do > script nao adianta copiar e colar ele, cada um tem q adaptar para o cenário > de sua empresa, lembrando quem cada um tem q fazer um if antes do DIAL para > montar a string de discagem com a rota específica, cada empresa vai ter uma > rota distinta :-) > > Sergio este script que vc postou foi de 2009 esste site do consultanumero > mudou completamente o sistema deles foi atualizado portanto este script que > fiz nao ira mais funcionar para os dias atuais, a saida é reescrever o > código para trabalhar com o novo site, mas eu ando meio sem tempo .... > > > []'s > > > Eng Eder de Souza > > > Em 25 de maio de 2010 08:36, jose <jasanc...@terra.com.br> escreveu: > > > Eder > Bom dia > Fiz a mudança abaixo, minha linha da discagem ficou > > $AGI->exec("Dial","DGV/g1|10?); > mas mesmo assim na cli aparece > > -- Executing [99988203...@agi:1] AGI("SIP/3900-b7c12060", "pega.pl") > in new stack > > -- Launched AGI Script /var/lib/asterisk/agi-bin/pega.pl > -- AGI Script pega.pl completed, returning 0 > == Auto fallthrough, channel 'SIP/3900-b7c12060' status is 'UNKNOWN' > > ----- Original Message ----- > *From:* Eder Souza <eder.so...@bsd.com.br> > *To:* asteriskbrasil@listas.asteriskbrasil.org > *Sent:* Monday, May 24, 2010 8:21 PM > *Subject:* Re: [AsteriskBrasil] RES: portabilidade > > Outra coisa vc deixou a linha de discagem comentada > > ####$AGI->exec(“Dial”,”SIP/MUDE AQUI PARA SUA SAIDA SIP ou GSM ou ZAP ou > DAHDI ou UNICALL ou DVG etc etc|10″); > > Suas ligações saem para fora como ? SIP, ZAP ? > > Eng Eder de Souza > > > Em 24 de maio de 2010 20:12, Eder Souza <eder.so...@bsd.com.br> escreveu: > > Oi pessoal to meio sumido da lista ando sem tempo, > > > mas testei o Script agora e para mim ta funcionando, eu fiquei de > reescrever o codigo para o consulta numero da BRT mas eu ando sem tempo > total.. > > Mas este erro é o seguinte esta vendo essa linha $num_saida = > substr($num_saida,3,10); mude para: > > $num_saida = substr($num_saida,3,8); > > testa e me fala > > > []'s > > > Eng Eder de Souza > > Em 13 de maio de 2010 07:00, sergio <ser...@inbox.com> escreveu: > > Eu também preciso colocar pra funcionar algo para portabilidade para > fazer o controle de saída das chamadas GSM. > > > -----Original Message----- > *From:* l...@dinamicca.com.br > *Sent:* Wed, 12 May 2010 15:58:53 -0300 > *To:* asteriskbrasil@listas.asteriskbrasil.org > *Subject:* [AsteriskBrasil] RES: portabilidade > > Estou com este mesmo resultado... > > > > -- Executing [66691824...@interno:1] AGI("SIP/25-087590f8", "pega.pl") > in new stack > > -- Launched AGI Script /var/lib/asterisk/agi-bin/pega.pl > > -- AGI Script pega.pl completed, returning 0 > > > > > > Tentei usar o script em perl, mas nao faz a consulta o que será que estou > fazendo de errado , no console aparece > > > > -- Executing [99991164...@agi:1] AGI("SIP/3974-08ccba38", "pega.pl") in > new stack > -- Launched AGI Script /var/lib/asterisk/agi-bin/pega.pl > -- AGI Script pega.pl completed, returning 0 > == Auto fallthrough, channel 'SIP/3974-08ccba38' status is 'UNKNOWN' > > > > ----- Original Message ----- > > *From:* sergio <ser...@inbox.com> > > *To:* asteriskbrasil@listas.asteriskbrasil.org > > *Sent:* Monday, May 10, 2010 4:24 PM > > *Subject:* Re: [AsteriskBrasil] portabilidade > > > > AGI em Perl que executa o Script em Python > > http://ederwander.wordpress.com/2010/01/15/agi-portabilidade-para-numeros-moveis-em-asterisk/ > > Script Python que Faz a Consulta > > > http://ederwander.wordpress.com/2009/11/26/portabilidade-dbo-descobrir-operadoras/ > > -----Original Message----- > *From:* engricardofra...@gmail.com > *Sent:* Mon, 10 May 2010 15:14:53 -0300 > *To:* asteriskbrasil@listas.asteriskbrasil.org > *Subject:* Re: [AsteriskBrasil] portabilidade > > Ola Senhores. > Que site é este? Como é feita a consulta? Alguém tem mais explicações sobre > o assunto? > > Att. > > Ricardo Franco > > jose wrote: > > Pessoal, algum tempo atras , um amigo aqui do forum postou essa soluçao > abaixo, quando disco para algum celular o mesmo procura no site ve de qual > operadora é e escolhe a rota. Mas nao está funcionando mais, algumem tem > outra saida para isso? > > > > #!/usr/bin/perl -w > > use Asterisk::AGI; > use WWW::Mechanize; > use MIME::Base64; > my $AGI = new Asterisk::AGI; > my %input = $AGI->ReadParse(); > my @operadoras = (“Eder”, “Claro”, “Tim”, “Vivo”, “Telemig”, “Oi”, > “Nextel”, “Brasil telecom”, “Sercomtel”, “CTBC”); > my $num_saida = $AGI->get_variable(‘EXTEN’); > $num_saida = substr($num_saida,3,10); > $m = WWW::Mechanize->new(); > my $data = > decode_base64(‘aHR0cDovL3dlYnNlcnZpY2VzLnR3d3dpcmVsZXNzLmNvbS5ici9yZWx1emNhcC93c3JlbHV6Y2FwL’ > . ‘mFzbXg=’); > $m->add_header(Referer => $data); > my $s = $data . “/VerOperadora?celular=55″ . $num_saida; > $m->get($s); > $c = $m->content; > $c =~ m/>(\d+)</; > $AGI->exec(“NoOp”,”$num_saida”); > $AGI->exec(“NoOp”,”$operadoras[$1]“); > > # O codigo se adapta conforme o cenario de cada um, mudar o DIAL para > rotear a saida da operadora em questao > ####$AGI->exec(“Dial”,”SIP/MUDE AQUI PARA SUA SAIDA SIP ou GSM ou ZAP ou > DAHDI ou UNICALL ou DVG etc etc|10″); > > # FIM > > Extensions.conf > > minha linha para a chamada do AGI de testes > > exten => _999.,1,agi,pega.pl > > > > ------------------------------ > > > > _______________________________________________ > > KHOMP: qualidade em placas de E1, GSM, FXS e FXO para Asterisk. > > - Hardware com alta disponibilidade de recursos e qualidade KHOMP > > - Suporte técnico local qualificado e gratuito > > Conheça a linha completa de produtos KHOMP em www.khomp.com.br > > _______________________________________________ > > A Redfone é líder no fornecimento de bridges TDMoE -> E1 > > - Valor similar ao de placas E1 PCI; > > - Não há problemas de compatibilidade com barramento PCI; > > - Possibilitam a construção de soluções de alta disponibilidade(dois > servidores compartilham o mesmo E1) > > Conheça mais sobre este produto em www.red-fone.com > > _______________________________________________ > > > > > > Lista de discussões AsteriskBrasil.org > > AsteriskBrasil@listas.asteriskbrasil.org > > http://listas.asteriskbrasil.org/mailman/listinfo/asteriskbrasil > > ------------------------------ > > _______________________________________________ > KHOMP: qualidade em placas de E1, GSM, FXS e FXO para Asterisk. > - Hardware com alta disponibilidade de recursos e qualidade KHOMP > - Suporte técnico local qualificado e gratuito > Conheça a linha completa de produtos KHOMP em www.khomp.com.br > _______________________________________________ > A Redfone é líder no fornecimento de bridges TDMoE -> E1 > - Valor similar ao de placas E1 PCI; > - Não há problemas de compatibilidade com barramento PCI; > - Possibilitam a construção de soluções de alta disponibilidade(dois > servidores compartilham o mesmo E1) > Conheça mais sobre este produto em www.red-fone.com > _______________________________________________ > > > Lista de discussões AsteriskBrasil.org > AsteriskBrasil@listas.asteriskbrasil.org > http://listas.asteriskbrasil.org/mailman/listinfo/asteriskbrasil > > No virus found in this incoming message. > Checked by AVG - www.avg.com > Version: 9.0.819 / Virus Database: 271.1.1/2867 - Release Date: 05/11/10 > 03:26:00 > > > _______________________________________________ > KHOMP: qualidade em placas de E1, GSM, FXS e FXO para Asterisk. > - Hardware com alta disponibilidade de recursos e qualidade KHOMP > - Suporte técnico local qualificado e gratuito > Conheça a linha completa de produtos KHOMP em www.khomp.com.br > _______________________________________________ > Participe do I Encontro VoIPCenter, 08 a 10 de junho – Rio de Janeiro. > Área de exposição, palestras e cursos de VoIP, Asterisk e Convergência de > Redes. > http://www.encontrovoipcenter.com.br > ______________________________________________ > Lista de discussões AsteriskBrasil.org > AsteriskBrasil@listas.asteriskbrasil.org > http://listas.asteriskbrasil.org/mailman/listinfo/asteriskbrasil > > > > ------------------------------ > > _______________________________________________ > KHOMP: qualidade em placas de E1, GSM, FXS e FXO para Asterisk. > - Hardware com alta disponibilidade de recursos e qualidade KHOMP > - Suporte técnico local qualificado e gratuito > Conheça a linha completa de produtos KHOMP em www.khomp.com.br > _______________________________________________ > Participe do I Encontro VoIPCenter, 08 a 10 de junho – Rio de Janeiro. > Área de exposição, palestras e cursos de VoIP, Asterisk e Convergência de > Redes. > http://www.encontrovoipcenter.com.br > ______________________________________________ > Lista de discussões AsteriskBrasil.org > AsteriskBrasil@listas.asteriskbrasil.org > http://listas.asteriskbrasil.org/mailman/listinfo/asteriskbrasil > > > _______________________________________________ > KHOMP: qualidade em placas de E1, GSM, FXS e FXO para Asterisk. > - Hardware com alta disponibilidade de recursos e qualidade KHOMP > - Suporte técnico local qualificado e gratuito > Conheça a linha completa de produtos KHOMP em www.khomp.com.br > _______________________________________________ > Participe do I Encontro VoIPCenter, 08 a 10 de junho – Rio de Janeiro. > Área de exposição, palestras e cursos de VoIP, Asterisk e Convergência de > Redes. > http://www.encontrovoipcenter.com.br > ______________________________________________ > Lista de discussões AsteriskBrasil.org > AsteriskBrasil@listas.asteriskbrasil.org > http://listas.asteriskbrasil.org/mailman/listinfo/asteriskbrasil > > > > _______________________________________________ > KHOMP: qualidade em placas de E1, GSM, FXS e FXO para Asterisk. > - Hardware com alta disponibilidade de recursos e qualidade KHOMP > - Suporte técnico local qualificado e gratuito > Conheça a linha completa de produtos KHOMP em www.khomp.com.br > _______________________________________________ > Participe do I Encontro VoIPCenter, 08 a 10 de junho – Rio de Janeiro. > Área de exposição, palestras e cursos de VoIP, Asterisk e Convergência de > Redes. > http://www.encontrovoipcenter.com.br > ______________________________________________ > Lista de discussões AsteriskBrasil.org > AsteriskBrasil@listas.asteriskbrasil.org > http://listas.asteriskbrasil.org/mailman/listinfo/asteriskbrasil >
_______________________________________________ KHOMP: qualidade em placas de E1, GSM, FXS e FXO para Asterisk. - Hardware com alta disponibilidade de recursos e qualidade KHOMP - Suporte técnico local qualificado e gratuito Conheça a linha completa de produtos KHOMP em www.khomp.com.br _______________________________________________ Participe do I Encontro VoIPCenter, 08 a 10 de junho Rio de Janeiro. Área de exposição, palestras e cursos de VoIP, Asterisk e Convergência de Redes. http://www.encontrovoipcenter.com.br ______________________________________________ Lista de discussões AsteriskBrasil.org AsteriskBrasil@listas.asteriskbrasil.org http://listas.asteriskbrasil.org/mailman/listinfo/asteriskbrasil