Select Code to Download

#!/usr/bin/perl
use strict;
...
        print "\t step: $st  random value: $results->{HASH}->{$st}\n";
     }
}

Thread 0 started: ar gy ment
I'm thread 0, step 0, random num 0.430995690710009
...
     step: 1  random value: 0.179563435583503
     step: 2  random value: 0.244457205562991
A thread exited while 11 threads were running.