Dear Monks, I was thinking to create a random string generator and then count the occurrence of characters and checking the differences in each word.

Here is my code so far:

#!/bin/bash/perl

@tests;

for($i=0; $i-4; $i++){
my @char = ('M','A','N','O');
my $len = 6;
my $string1;
my $string2;
while($len--){ $string1 .= $char[rand @char]; $string2 .= $char[rand @
+char];};
print "$string1\t$string2\n";
$string =  $string1.' '.$string2;
 push(@tests, $string);
 
}
[download]