Eu uso use String::Approx 'amatch'; print if amatch("foobar"); my @matches = amatch("xyzzy", @inputs); my @catches = amatch("plugh", ['2'], @inputs); Em Qui, 2012-06-28 às 18:20 -0300, Stanislaw Pusep escreveu: > > Um dos exemplos de aplicação prática dela é o utilitário > 'agrep' (approximate grep).