Select Code to Download

#!/usr/bin/perl

...

  print "\n\n ERRORS = $ERRORS \n\n";
}

sub hasSameChars
{
...

  return 1;
}