The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.
use strict;
use warnings;
use Test::More tests => 1;
use Lingua::Alphabet::Phonetic;

is(join('', Lingua::Alphabet::Phonetic->new("LAPD")->enunciate("1-A-12")), 'One-Adam-OneTwo', "1-A-12 = One-Adam-OneTwo");