Select Code to Download

sub func() {
    srand $CONSTANT;
...
func();
srand $seed;  # Get back to "random" sequence again?
my $random2 = rand;