generate random number in perl

Could any one tell how can I generate random number from (0, 100..200) in perl?

Thanks!

one way:

my @n = (0,100..200);
my $i = $n[int rand @n];
print $i;

Thanks a lot!