17 lines
372 B
Raku
17 lines
372 B
Raku
use Test;
|
|
BEGIN { plan tests => 6 };
|
|
|
|
use Text::LevenshteinXS qw(distance);
|
|
|
|
ok(1);
|
|
if (distance("foo","four") == 2) {ok(1)} else {ok(0)}
|
|
if (distance("foo","foo") == 0) {ok(1)} else {ok(0)}
|
|
if (distance("foo","") == 3) {ok(1)} else {ok(0)}
|
|
if (distance("four","foo") == 2) {ok(1)} else {ok(0)}
|
|
if (distance("foo","bar") == 3) {ok(1)} else {ok(0)}
|
|
|
|
|
|
|
|
|
|
|