1#!perl 2 3use strict; 4use warnings; 5use utf8; 6 7use lib 't/lib'; 8use Text::Levenshtein::TestUtils qw/ run_data_tests /; 9 10run_data_tests(); 11 12__DATA__ 13решение 14решето 153 16-- 17статуя 18статус 191 20-- 21дверь 22двор 232 24-- 25смысл 26мысль 272 28-- 29кость 30кисть 311 32-- 33распределение 34определение 353 36-- 37