André Luiz, vou fazer da sua forma, obrigado.Agora fiquei sem entender porque 
$SIG{qw (INT TERM HUP)}...
Renato, tentei fazer assim:my $c = 0; $SIG{INT} = sub { $c <= 2 ? $c++ : die };
while (1) {    print "TESTE\n";    sleep 1;}
Deu certo, mas deu errado, por algum motivo tenho que apertar ctrl + c umas 4 
vezes ou mais para dar certo

From: renato.c...@gmail.com
Date: Mon, 25 Nov 2013 16:22:07 -0200
To: rio-pm@pm.org
Subject: Re: [Rio-pm] [HELP] Controlando comandos do sistema

 SIGINT        2       Term    Interrupt from keyboard




Esse é o CTRL+C,






$SIG{INT} = 'IGNORE';







não consegui fazer assim:


my $c = 0; $SIG{INT} = sub { return 'IGNORE' if $c++ < 3 };



não sei porque, alguem sabe?




2013/11/25 Andre Luis <alpbs2...@gmail.com>



nesse caso só iria ignorar ele nao irira tratar ... pelo que eu entendi ele 
quer tratar 


$SIG{KILL} = sub {  do_something() }; 
 



Em 25 de novembro de 2013 16:06, Renato Santos <renato.c...@gmail.com> escreveu:




você tem que ignorar o sinal de KILL do sistema.



para saber mais sobre os sinais, http://perldoc.perl.org/perlipc.html




algo para ignorar pra sempre,$SIG{KILL} = 'IGNORE';

2013/11/25 Aureliano Guedes <guedes_1...@hotmail.com>









Boa tarde,Monges.
Gostaria de saber se existe a possibilidade de eu controlar comandos do sistema?
Bom, quando estamos executando algum script, se eu quiser encerra-lo a qualquer 
momento basta que eu tecle Ctrl + C.





Mas e se eu quisesse, especificamente em um script, determinar que seu 
encerramento fosse após apertar 3 vezes consecutivas Ctrl + C, ou então ao 
apertar Ctrl + shift + C, ou sei lá, qualquer outro comando que eu queira, como 
deveria fazer?






Desde já grato.
Att,Aureliano Guedes                                      

_______________________________________________

Rio-pm mailing list

Rio-pm@pm.org

http://mail.pm.org/mailman/listinfo/rio-pm



-- 
Saravá,

Renato CRONhttp://www.renatocron.com/blog/





@renato_cron


_______________________________________________

Rio-pm mailing list

Rio-pm@pm.org

http://mail.pm.org/mailman/listinfo/rio-pm


-- 

"technology does not drive change - it enables change"


_______________________________________________

Rio-pm mailing list

Rio-pm@pm.org

http://mail.pm.org/mailman/listinfo/rio-pm


-- 
Saravá,


Renato CRONhttp://www.renatocron.com/blog/


@renato_cron


_______________________________________________
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm                                      
  
_______________________________________________
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm

Responder a