Perl Random Function with Limits

This code generates and prints a random integer between 25 and 75, inclusive:

$random = int( rand(51)) + 25;
print "$random\n";

ie rand(DEFINE LIMIT) + Offset.