rand() function in Perl returns a random fractional number between 0 and the positive number value passed to it, or 1 if no value is specified. Automatically calls srand() to seed the random number generator unless it has already been called.
Syntax: rand(range_value)
Parameter:
range_value: a positive number to specify the rangeReturns:
a random Floating point number between 0 and the specified value
Example 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" );
|
Output:
Random Number between 0 and 15: 12.6694798049858
Example 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" );
|
Output:
Random Number between 0 and -25: -7.54296459674615