Con el comando sleep() puedes hacer que un programa espere 30 minutos. Por ejemplo,
Using perl Syntax Highlighting
sleep 30
* 60; # espera 30 minutosColoreado en 0.003 segundos, usando
GeSHi 1.0.8.4
Y con el comando rand() generas un número aleatorio. Esto es lo que tienes con
perldoc -r rand:
Using text Syntax Highlighting
rand EXPR
rand
Devuelve un número decimal aleatorio mayor o igual a 0 y menor que el valor de EXPR. (EXPR debe ser positiva). Si la EXPR se omite, se usa 1. Actualmente EXPR con el valor de 0 es también un caso especial como el de 1 (no estaba documentado esto antes de Perl 5.8.0 y esta sujeto a cambios en futuras versiones de Perl). Automáticamente llama a "srand" a menos que "srand" ya haya sido llamado. Ver también "srand".
Aplique "int()" al valor devuelto por "rand()" si quiere obtener enteros aleatorios en lugar de fraccionarios. Por ejemplo,
int(rand(10))
Coloreado en 0.000 segundos, usando
GeSHi 1.0.8.4
Por ejemplo, para sacar un valor entre 1 y 6, inclusives:
int 1 + rand 6Para estas tareas sencillas no necesitas módulos, salvo que necesites algo más especial.
Publicado: 2015-05-23 19:14 @843