1use Test; 2BEGIN { plan tests => 6 }; 3 4use Text::LevenshteinXS qw(distance); 5 6ok(1); 7if (distance("foo","four") == 2) {ok(1)} else {ok(0)} 8if (distance("foo","foo") == 0) {ok(1)} else {ok(0)} 9if (distance("foo","") == 3) {ok(1)} else {ok(0)} 10if (distance("four","foo") == 2) {ok(1)} else {ok(0)} 11if (distance("foo","bar") == 3) {ok(1)} else {ok(0)} 12 13 14 15 16 17