perl | Función al azar()

La función rand() en Perl devuelve un número fraccionario aleatorio entre 0 y el valor numérico positivo que se le pasó, o 1 si no se especifica ningún valor. Llama automáticamente a srand() para inicializar el generador de números aleatorios a menos que ya se haya llamado.

Sintaxis: rand(rango_valor)

Parámetro:
range_value: un número positivo para especificar el rango

Devuelve:
un número de punto flotante aleatorio entre 0 y el valor especificado

Ejemplo 1:

#!/usr/bin/perl -w
  
# Calling the rand function
$random = rand(15);
  
# print the random number
# between 0 and 15
print("Random Number between 0 and 15: ",
                          $random, "\n");

Producción:

Random Number between 0 and 15: 12.6694798049858

 
Ejemplo 2:

#!/usr/bin/perl -w
  
# Calling the rand function
# with negative value
$random = rand(-25);
  
# print the random number
# between 0 and -25
print("Random Number between 0 and -25: ", 
                           $random, "\n");

Producción:

Random Number between 0 and -25: -7.54296459674615