Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
use strict;
...

cmpthese(-10, $comphash);
__END__
  2. or download this
    ba2bi2(@bytes)
+123456781234567812345678123456781234567812345678123456781234567812345
+67812345678
...
ba2bi2 69.2/s  1221%   890%     1%     --    -0%    -3%
nomap  69.5/s  1226%   894%     1%     0%     --    -2%
unpack 71.0/s  1256%   917%     4%     3%     2%     --