Mega Sena
Publicado por Leonardo Berbert Gomes (última atualização em 09/08/2011)
[ Hits: 5.399 ]
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";
Algoritmo de Euclides estendido em Perl
Instalar e Configurar o Slackware Linux em 2025
Como configurar os repositórios do apt no Debian 12 em 2025
Passkeys: A Evolução da Autenticação Digital
Instalação de distro Linux em computadores, netbooks, etc, em rede com o Clonezilla
Configurando o Conky para iniciar corretamente no sistema
3 configurações básicas que podem melhorar muito a sua edição pelo editor nano
Como colorir os logs do terminal com ccze
Instalação Microsoft Edge no Linux Mint 22
Como configurar posicionamento e movimento de janelas no Lubuntu (Openbox) com atalhos de teclado
Jogando com Proton no LInux (1)
Linux Mint limitando rede a 20Mbps (6)
Ingress NGINX Controller CVSS base score of 9.8 (4)
Impossível corrigir problemas, você manteve (hold) pacotes quebrados. (2)