>perl -wMstrict -le
"use Text::LevenshteinXS;
 ;;
 my $tyop = 'twst.html';
 for my $try (qw(test.html testb.html)) {
   my $d = distance($tyop, $try);
   print qq{'$tyop' < $d > '$try'};
   }
"
'twst.html' < 1 > 'test.html'
'twst.html' < 2 > 'testb.html'