Enviado em 06/06/2016 - 18:51h
script básico de autenticação se enviar uma key contida no keys.txt continua o programa está funcionando mais acontece o seguinte algumas solicitações são respondidas e outras acabam não sendo respondidas como faria pra ficar mais rápido o código para responder todas?my $file = './keys.txt'; open my $fh, '<', $file or die $!; my @keys; while ( my $line = readline $fh ) { my ( $keys, $comment ) = split /\s*#\s*/, $line, 2; push @keys, $keys; } close $fh; my $args->{individualkey} = 'teste'; #Simulação do envio da key que será remoto if ( ! grep { $_ eq $args->{individualkey} } @keys ) { print "Key invalida \n"; return $self; }
Enviado em 06/06/2016 - 19:03h
Ola,Enviado em 06/06/2016 - 19:07h
Pode tentar aumentando o tempo de timeout.Enviado em 10/06/2016 - 09:02h
Conseguiu resolver?Programa IRPF - Guia de Instalação e Resolução de alguns Problemas
Criando uma Infraestrutura para uma micro Empresa
Criar entrada (menuentry) ISO no Grub
Como gerar qualquer emoji ou símbolo unicode a partir do seu teclado
Instalando o Pi-Hole versão v5.18.4 depois do lançamento da versão v6.0
Instalar o VIM 9.1 no Debian 12
Como saber o range de um IP público?
Muitas dificuldades ao instalar distro Linux em Notebook Sony Vaio PCG-6131L (VPCEA24FM)
Atualização do Google Chrome do Ubuntu (1)
Jogos baixados na Central de Aplicativos mas que não abrem (0)