Enviado em 07/05/2016 - 20:01h
Boa noite gostaria de ajuda com meu script minha intenção e essa o cliente tem outro script que envia 2 dados no caso o ip e usuario, queria ler o ip e delimitar 5 usuários nesse determinado ip se fosse tentando logar o sexto o código avisaria e retornaria.my %data = ($args->{args}{'IP'} => $args->{username}); #Recebe o ip e o username
my @IP = keys %data;
my @Users = values %data;
my $size = @Users;
foreach my $IP (@IP) {
if ($IP && $size > 5) { #Aqui seria a verificação se estivessem mais de 5 usuários no ip falharia a autenticação
print "Limite máximo de conexão atingido\n";
return $args->{auth_failed};
}
}
Máquina perereca - até onde é possível o uso de Linux?
Mitigação - O que é e quando é "seguro" desabilitar
Atualizar Debian Online de uma Versão para outra
A arte e a prática da Disciplina a longo prazo
Topgrade - Atualize seu sistema Linux inteiro com um único comando
Reescalando a tela hd para fullhd com o xrandr
Site com diversos emojis para seus códigos
Um modo leve de ouvir/ver áudio/vídeo da internet em máquinas pererecas
Rede Windows / Linux Mint- pastas e arquivos somente como leitura (4)
Agora temos uma assistente virtual no fórum!!! (252)
Debian 11 Bullseye não liga normalmente (17)