diff options
| author | Augie De Blieck Jr <augiedb@gmail.com> | 2023-10-14 15:33:19 -0400 |
|---|---|---|
| committer | Augie De Blieck Jr <augiedb@gmail.com> | 2023-10-14 15:33:19 -0400 |
| commit | 828d3499a3b645377f8be6a52823b37b1209df0d (patch) | |
| tree | 1199268c81fac81a8f9794459017ae48f25ffe56 | |
| parent | 8632ea46fb2869edc4b71f1682b3e966e087c30a (diff) | |
| download | perlweeklychallenge-club-828d3499a3b645377f8be6a52823b37b1209df0d.tar.gz perlweeklychallenge-club-828d3499a3b645377f8be6a52823b37b1209df0d.tar.bz2 perlweeklychallenge-club-828d3499a3b645377f8be6a52823b37b1209df0d.zip | |
Spell check
| -rw-r--r-- | challenge-238/augiedb/perl/ch-2.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-238/augiedb/perl/ch-2.pl b/challenge-238/augiedb/perl/ch-2.pl index f2626eadb7..f994839183 100644 --- a/challenge-238/augiedb/perl/ch-2.pl +++ b/challenge-238/augiedb/perl/ch-2.pl @@ -21,7 +21,7 @@ foreach my $array_ref( @tests ) { print "BEFORE: "; pretty_print_array( $array_ref); - my @results = persistance_sort( $array_ref ); + my @results = persistence_sort( $array_ref ); print "AFTER: "; pretty_print_array(\@results); @@ -35,7 +35,7 @@ foreach my $array_ref( @tests ) { ## Basically, main(): -sub persistance_sort { +sub persistence_sort { my @array = @{ shift() }; |