Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...

printf( "Digests are %s\n",
        ( $d1 eq $sorted_d1 ) ? 'equal' : 'unequal' );

Select or download this
```
[aa|a|]
[|a|aa]
Digests are equal
```