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.
perl
Output:
perl
Output:
Syntax: rand(range_value) Parameter: range_value: a positive number to specify the range Returns: a random Floating point number between 0 and the specified valueExample 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");
Random Number between 0 and 15: 12.6694798049858Example 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");
Random Number between 0 and -25: -7.54296459674615