[SP-pm] Autenticador Squid em Perl

Fernando Oliveira fernandocorrea em gmail.com
Quinta Junho 5 07:32:19 PDT 2008


2008/6/5 Fernando Oliveira <fernandocorrea em gmail.com>:

>
>
> 2008/6/5 Luis Motta Campos <luismottacampos em yahoo.co.uk>:
>
>> Lucas Mateus wrote:
>> > Ja fiz varios autenticadores e redirecionadores para Squid em Perl com
>> > consultas em LDAP ou MySQL e integração com outros programas em outros
>> > servidores via Socket.
>> >
>> >
>> > É muito simples:
>> >
>>
>> Simples, é mesmo. E agora está organizado. :P
>>
>> #!/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 ) = split qr{\s+};
>
> # Não seria melhor assim, p/ possibilitar senhas com espaço?
>    my @userPass = split / /;
>    my $user = $userPass[0];
>    my $password = join " ", @userPass[1 .. $#userPass];
>
# ou ainda melhor:
   my @userPass = split / /;
   my $user = shift @userPass;
   my $password = join " ", @userPass;


>
>
>>     print "ERR\n" unless $password;    # do not accept empty
>>     print "OK\n" if is_valid( $user, $password );
>> }
>> __END__
>>
>> Eu acho impossível que não exista um pacote no CPAN para isso. Alguém
>> com mais tempo que eu pode por favor dar uma vasculhada por lá?
>>
>> Se não existir pacote, eu vou construir um e publicar, sob instruções.
>>
>> 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
>>
>
>
>
> --
> Just another Perl Hacker,
> Fernando (SmokeMachine)
> http://perl-e.org




-- 
Just another Perl Hacker,
Fernando (SmokeMachine)
http://perl-e.org
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/saopaulo-pm/attachments/20080605/a350fba3/attachment.html 


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