Help for this page

Select Code to Download


  1. or download this
    for my $d ( 30 .. 36 ) {
      my $this = $nil->text2digest( ( 'a' x $d ) . 'b' ) ;
      my $that = $nil->text2digest( ( 'a' x ( $d + 1 ) ) ) ;
    ...
             $diff . qq( characters different\n) .
             ( abs $diff2 ) . qq( bits different\n\n);
      }
    
  2. or download this
    000000000000900000010021000008105000080010000004000c400000000008
    0000000000009000000000200000080040000000000000040008400000000000
    8 characters different
    ...
    0000000000009000000000200000080040000000000000040008400000000000
    0 characters different
    0 bits different