[SP-pm] Autenticador Squid em Perl

Gabriel Vieira gabriel.vieira em gmail.com
Quinta Junho 5 12:39:55 PDT 2008


E é simples assim!? ehehe :)

Lucas Mateus é o franciscano GURU do Squid.

2008/6/5 Luis Motta Campos <luismottacampos em yahoo.co.uk>:
> Luis Motta Campos wrote:
>> A implementação mais nova é assim:
>>
>> #!/usr/bin/perl
>> use strict;
>> use warnings;
>> use IO::Handle;
>>
>> STDOUT->autoflush(1);
>> STDERR->autoflush(1);
>>
>> # implement your password validation here
>> sub is_valid;
>>
>> while (<>) {
>>      my ( $user, $password ) = m{^(\S+)(?:\s+(.+))?$};
>>      print is_valid( $user, $password ) ? qq{OK\n} : qq{ERR\n};
>> }
>> __END__
>
> Agora que estamos todos de acordo, alguém pode por favor me apontar para
> a documentação sobre como colocar isso no Squid, para que eu possa
> transformar isso num módulo útil e colocar no CPAN?
>
> Putamplexos!
> --
> Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer,
> Perl fanatic evangelist, and amateur {cook, photographer}
> _______________________________________________
> SaoPaulo-pm mailing list
> SaoPaulo-pm em pm.org
> http://mail.pm.org/mailman/listinfo/saopaulo-pm
>



-- 
Gabriel Vieira


Mais detalhes sobre a lista de discussão SaoPaulo-pm