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};
}
}
IA local no bolso, novo visual no Raspberry Pi OS e mais destaques do software livre
Kernel turbinado, compatibilidade em alta e debate sobre sustentabilidade: o dia no mundo Linux
Kernel turbinado e GNOME 49 dominam o giro do dia no mundo Linux
Novidades Linux: Kernel 6.17, distros em ebulição e segurança em foco
Kernel ganha novos linters Rust e distros avançam com recursos de IA
Adicionando o repositório backports no Debian 13 Trixie
Como definir um IP estático no Linux Debian
Orientação para instalar o Warsaw - módulo de proteção do Banco do Bra... (8)
systemd-resol... precisa ser reiniciado periodicamente (5)
Alguém que utilize o Warsaw do BB no Ubuntu 24.04 [RESOLVIDO] (6)
Fedora não reconhece James Donkey 102 Wireless Gaming Mouse (2)