usamos por aqui
use Text::DoubleMetaphone qw( double_metaphone ); # casamento fonetico
use String::Approx 'adist';
From: Stanislaw Pusep
Sent: Monday, July 02, 2012 9:24 AM
To: Perl Mongers Rio de Janeiro
Cc: [email protected]
Subject: Re: [Rio-pm] :engine::TRE
Bom dia Thiago!
Obrigado pela dica, não conhecia o String::Approx. Pelo meu rápido RTFS, usa o
mesmo algoritmo que o re::engine::TRE (https://en.wikipedia.org/wiki/Bitap).
Também fiz a coisa mais óbvia, que devia ter feito antes de mandar o email para
a lista: olhei no CPAN Testers, e percebi que o módulo em questão só funcionava
até Perl v5.10. Entrei em contato com o autor, e ele confirmou que as
"entranhas" do Perl tornaram-se incompatíveis a partir do v5.12.
Verei o que faço a respeito; o módulo me pareceu deveras útil.
ABS()
2012/6/29 Thiago Glauco <[email protected]>
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).
_______________________________________________
Rio-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/rio-pm
--------------------------------------------------------------------------------
_______________________________________________
Rio-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/rio-pm_______________________________________________
Rio-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/rio-pm
