Select Code to Download

#!/usr/bin/env perl
use strict;
...
print "fake rand: ".rand()."\n";
abc();
sub abc { print "real rand(): ".rand()."\n" }