aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLakpa Tashi Bhutia <lakpatashi@users.noreply.github.com>2023-11-25 21:21:31 +0530
committerGitHub <noreply@github.com>2023-11-25 21:21:31 +0530
commit0583a467e50d3a133776047923e6ce517666c3ef (patch)
tree8955f4386897941315a30313a83acbb338aa425f
parent6db863c3ee8cb8a3315eeae5fde99af83385aefc (diff)
parente553cd69b5a060845c5046c9ad7c91684308b0b3 (diff)
downloadperlweeklychallenge-club-0583a467e50d3a133776047923e6ce517666c3ef.tar.gz
perlweeklychallenge-club-0583a467e50d3a133776047923e6ce517666c3ef.tar.bz2
perlweeklychallenge-club-0583a467e50d3a133776047923e6ce517666c3ef.zip
Merge pull request #1 from lakpatashi/lakpatashi-patch-3
Update challenge-003 ch-2.pl v2
-rwxr-xr-xchallenge-004/lakpatashi/perl/ch-2.pl1
1 files changed, 1 insertions, 0 deletions
diff --git a/challenge-004/lakpatashi/perl/ch-2.pl b/challenge-004/lakpatashi/perl/ch-2.pl
index 013893f9c2..03230f001c 100755
--- a/challenge-004/lakpatashi/perl/ch-2.pl
+++ b/challenge-004/lakpatashi/perl/ch-2.pl
@@ -48,6 +48,7 @@ sub buildFreq{ #given a string returns letter freq. hash
# ------------- version 2 -----------------------
+# -----------------------------------------------
sub checkWord {
my ($word,$letters) = @_;
$word = join '\w*', sort split //, lc $word;