@ISA = qw(Exporter);
@EXPORT = qw(&soundex $soundex_nocode);
+$VERSION = '1.01';
+
# $Id: soundex.pl,v 1.2 1994/03/24 00:30:27 mike Exp $
#
# Implementation of soundex algorithm as described by Knuth in volume
# 3 of The Art of Computer Programming, with ideas stolen from Ian
-# Phillips <ian@pipex.net>.
+# Phillipps <ian@pipex.net>.
#
# Mike Stok <Mike.Stok@meiko.concord.ma.us>, 2 March 1994.
#
can be assigned to C<$soundex_nocode>.
In scalar context C<soundex> returns the soundex code of its first
-argument, and in array context a list is returned in which each element is the
+argument, and in list context a list is returned in which each element is the
soundex code for the corresponding argument passed to C<soundex> e.g.
@codes = soundex qw(Mike Stok);
=head1 AUTHOR
This code was implemented by Mike Stok (C<stok@cybercom.net>) from the
-description given by Knuth. Ian Phillips (C<ian@pipex.net>) and Rich Pinder
+description given by Knuth. Ian Phillipps (C<ian@pipex.net>) and Rich Pinder
(C<rpinder@hsc.usc.edu>) supplied ideas and spotted mistakes.