[Cascavel-pm] Daemon mandando informacos para um CGI

[Solli Moreira Honorio]

> Rau, mongers!
> 
> Algumas duvidas..
> 1) Como eu faco pra fazer um "daemon" no windows? tipo colocar ele no
> service? ( ok ok eu nem procurei nada a respeito estou perguntando na cara
> de pau, sem RTFM :P )
O Win32::Daemon é o cara que vc está procurando. Ele está no repositório http://www.roth.net/perl/packages/.
Abaixo está um bloco exemplo de como utilizar o cara.

<code>
use Win32::Daemon;

if (! Win32::Daemon::StartService() ) {
    die "Não foi possível iniciar o serviço. Ocorreu o erro " . Win32::Daemon::GetLastError();
}

while( SERVICE_STOPPED != ( $status = Win32::Daemon::State() ) ) {
    if( SERVICE_START_PENDING    == $status ||
        SERVICE_CONTINUE_PENDING == $status ) {
        Win32::Daemon::State( SERVICE_RUNNING );
        next;  
    }
    elsif( SERVICE_PAUSE_PENDING == $status ) {
        Win32::Daemon::State( SERVICE_PAUSED );
        next;  
    }
    elsif( SERVICE_STOP_PENDING  == $status ) {
        Win32::Daemon::State( SERVICE_STOPPED );
        next; 
    }
    elsif( SERVICE_RUNNING       == $status ) {
        if ( ( time() - $loopInterval ) >= 300 ) {
            $loopInterval = time();
        }
    }
    sleep( 2 );
}

Win32::Daemon::StopService();

</code> 
> 2) Eu queria que esse "daemon" mandasse informacoes para um CGI, como eu
> poderia fazer isso de uma forma segura? sendo que provavelmente o CGI ficara
> em outra maquina, e essa sera linux.
O que vc que dizer com 'segura' ? Criptografada ? Com autenticação ?