String::Nysiis

Nysiis (NNew York State Identification and Intelligence System)
phonetic encoding algorithm.  Similar in nature to the Soundex,
Metahpone, and DoubleMetaphone algorithms.


      use String::Nysiis qw(nysiis);
      my $enc = nysiis($string);

      print nysiis('Larry'),"\n"; # should print LARY


Any advice on name/content/etc?


Thanks for your time,

Kyle R. Burton
KRBURTON


-- 
------------------------------------------------------------------------------
   Of course power tools and alcohol don't mix.  Everyone knows power tools 
   aren't soluble in alcohol...      -- Crazy Nigel
[EMAIL PROTECTED]                            http://www.voicenet.com/~mortis
------------------------------------------------------------------------------

Reply via email to