Programação em Perl

[drtuborg]

DOS?????

estás a executar Perl em Windoes?


Não te vou dizer que não funciona, mas é muito limitado. Muitos módulos que estao no CPAN não funcionam nesse "SO".

Dá para fazeres coisas básicas, mas se precisares de descomplicar código não é o melhor ambiente de trabalho.

 

[Eddy]

DOS?????

estás a executar Perl em Windoes?


Não te vou dizer que não funciona, mas é muito limitado. Muitos módulos que estao no CPAN não funcionam nesse "SO".

Dá para fazeres coisas básicas, mas se precisares de descomplicar código não é o melhor ambiente de trabalho.

Ahhh... pois, estou sim, estou a trabalhar em windows, devia estar em unix ou linux, n era?

Aqui no serviço n há, tem q ser msm assim.
O dump da variável ajudou alguma coisa?


Cumps e thx,
Edd

 

[neoxic]

Tanta gaja boa...

 

[Eddy]

Boas,

Volto com mais umas dúvidas:

Neste comando

 my $sessao = Net::Telnet::Cisco->new(host => $end_ip, errmode => 'return');

O q posso fazer para o programa n parar?

O q se passa é q por vezes o programa pára sem motivo aparente e estava aqui a pensar se poderei colocar um temporizador de modo a q siga sem problemas.
A única premissa é o programa n sair mas sim continuar a sua execução, isto se for possível claro.


Cumps,
Edd

 

[Nuno156]

Boas,

Volto com mais umas dúvidas:

Neste comando

 my $sessao = Net::Telnet::Cisco->new(host => $end_ip, errmode => 'return');

O q posso fazer para o programa n parar?

O q se passa é q por vezes o programa pára sem motivo aparente e estava aqui a pensar se poderei colocar um temporizador de modo a q siga sem problemas.
A única premissa é o programa n sair mas sim continuar a sua execução, isto se for possível claro.


Cumps,
Edd

O que é que consideras parar?

A conexão não pode estar aberta sem estar a ser usada... é o servidor
(serviço) que a termina.

 

[Eddy]

O que é que consideras parar?

A conexão não pode estar aberta sem estar a ser usada... é o servidor
(serviço) que a termina.

Enquanto nuns equipamentos demora pouquissimo, noutros está ali uma eternidade, já cheguei a deixar estar 10min e nada, n passa dali e n recolhe a informação q eu quero.

É isto q eu considero parar, se calhar n é a melhor maneira de colocar a coisa.

Espero ter-me feito entender...

Edd

 

[Eddy]

Agora o comando não me funciona numa outra máquina UNIX... só corre na máquina Win.

 my $sessao = Net::Telnet::Cisco->new(host => $end_ip, errmode => 'return');

Como é q eu posso por isto a correr em UNIX?

Há alguma conversão *.pl -> "executável" UNIX?

N posso instalar as livrarias...


Edd

 

[Nuno156]

Agora o comando não me funciona numa outra máquina UNIX... só corre na máquina Win.

 my $sessao = Net::Telnet::Cisco->new(host => $end_ip, errmode => 'return');

Como é q eu posso por isto a correr em UNIX?

Há alguma conversão *.pl -> "executável" UNIX?

N posso instalar as livrarias...


Edd

Faz "dos2unix ficheiro.pl" para converter o par CR/LF.

 

[Nuno156]

Enquanto nuns equipamentos demora pouquissimo, noutros está ali uma eternidade, já cheguei a deixar estar 10min e nada, n passa dali e n recolhe a informação q eu quero.

É isto q eu considero parar, se calhar n é a melhor maneira de colocar a coisa.

Espero ter-me feito entender...

Edd

Podes experimentar alterar a filosofia do programa, para usar THREADS.

Se a biblioteca NET::TELNET::CISCO tiver um parâmetro de TIMEOUT melhor
ainda. Assim todas as ligações são feitas concorrentemente, e não ficam à
espera uma da outra. O programa prossegue assim que todas terminarem ou
derem TIMEOUT.

Por exemplo, se fizeres 50 ligações, cada uma com um TIMEOUT de 30
segundos, com THREADS ficas à espera, no máximo, cerca de 30 segundos.
Sem THREADS, ficas à espera, no máximo, cerca de 30 x 50 segundos.

 

[Eddy]

Faz "dos2unix ficheiro.pl" para converter o par CR/LF.

Já fiz: dos2unix -iso -ascii -7 Script_csvV2.pl Script_V2

Deveria colocar alguma coisa como extensão, n?
É q n percebo nada de UNIX! Estou p/ aqui a inventar... e isto n corre...
Como é q dps se corre isto?

Podes experimentar alterar a filosofia do programa, para usar THREADS.

Se a biblioteca NET::TELNET::CISCO tiver um parâmetro de TIMEOUT melhor
ainda. Assim todas as ligações são feitas concorrentemente, e não ficam à
espera uma da outra. O programa prossegue assim que todas terminarem ou
derem TIMEOUT.

Por exemplo, se fizeres 50 ligações, cada uma com um TIMEOUT de 30
segundos, com THREADS ficas à espera, no máximo, cerca de 30 segundos.
Sem THREADS, ficas à espera, no máximo, cerca de 30 x 50 segundos.

Até modificava o raciocínio, se soubesse!
Eu sei q estou a pedir mt mas, como é q vejo se aquela biblioteca tem um paràmetro de time-out?

N tens 30min p/ explicar isto tudo, n? []

Em todo o caso mt obrigado por tudo o q já ajudaste até aqui!


Cumps,
Edd

 

[Nuno156]

Já fiz: dos2unix -iso -ascii -7 Script_csvV2.pl Script_V2

Deveria colocar alguma coisa como extensão, n?
É q n percebo nada de UNIX! Estou p/ aqui a inventar... e isto n corre...
Como é q dps se corre isto?



Até modificava o raciocínio, se soubesse!
Eu sei q estou a pedir mt mas, como é q vejo se aquela biblioteca tem um paràmetro de time-out?

N tens 30min p/ explicar isto tudo, n? []

Em todo o caso mt obrigado por tudo o q já ajudaste até aqui!


Cumps,
Edd

Se 30 minutos fossem suficientes...

Net::Telnet::Cisco - interact with a Cisco router
Pelos vistos tem TIMEOUT.

Quanto aos THREADS:
threads - perldoc.perl.org

Quanto ao ficheiro de WINDOWS não correr em UNIX... qual é o erro que dá?