Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
my $bits= $x->request (16);  # parameter is bytes to fetch, up to 2048
+.
print length($bits)," bytes: ";
print unpack("H*", $bits), "\n";
  2. or download this
    =head1 NAME B<HotBits> - download hardware random numbers

...
 }

1; # module loaded OK.