Soundex Matching

Author: stmuk

You have two surnames and want to know if they sound similar

Source code: 01-22soundex-matching.p6

#!/usr/bin/env perl6

use v6;

use Algorithm::Soundex;

my Algorithm::Soundex $s .= new();

say  $s.soundex("Smith");
say  $s.soundex("Smythe");
say  $s.soundex("Bloggs");