Mega Sena
Publicado por Leonardo Berbert Gomes (última atualização em 09/08/2011)
[ Hits: 5.535 ]
Homepage: https://www.linkedin.com/in/leoberbert
Simples script que sorteia 6 números de forma aleatória para a mega sena.
Obs: Este script não faz nenhum jogo preciso, pois é aleatório.
#!/usr/bin/perl
print "\n Mega-Sena \n\n";
my @range = (0 .. 60);
for ($x=0; $x<=5; $x++)
{
@random_number = int(rand(@range)+1);
print "@random_number ";
}
print "\n\n";
Calculadora com Perl com menos de 10 linhas de código
Como extrair chaves TOTP 2FA a partir de QRCODE (Google Authenticator)
Linux em 2025: Segurança prática para o usuário
Desktop Linux em alta: novos apps, distros e privacidade marcam o sábado
IA chega ao desktop e impulsiona produtividade no mundo Linux
Novos apps de produtividade, avanços em IA e distros em ebulição agitam o universo Linux
Como instalar o repositório do DBeaver no Ubuntu
Como instalar o Plex Media Server no Ubuntu
Digitando underscore com "shift" + "barra de espaços"
Como ativar a lixeira e recuperar aquivos deletados em um servidor Linux
Como mudar o nome de dispositivos Bluetooth via linha de comando
How can I remove duplicate MSG files from my folders effectively? (0)
O programa assinador digital (0)
dpkg: erro: gatilho de arquivo duplicado chamado pelo arquivo de nome (6)









