Help for this page
#!/usr/bin/perl -w use strict; ... print &$get_next . "\n" if rand(5) < 2.0; print &$get_another . "\n" if rand(5) < 3.5; }
$ ./continuation.pl Next: 600 ... Another: 1000 Another: 1100 Next: 1000