diff options
| author | Myoungjin JEON <jeongoon@gmail.com> | 2020-09-05 22:11:27 +1000 |
|---|---|---|
| committer | Myoungjin JEON <jeongoon@gmail.com> | 2020-09-05 22:11:27 +1000 |
| commit | ba34487e5b1694b14970f684cc253b06bd1b6e9a (patch) | |
| tree | 12bee52e7ab46e8c76126e67e51ecb4498fdc368 | |
| parent | 7e47211b82aac589f0f1912eccf42cd35f97f0ef (diff) | |
| download | perlweeklychallenge-club-ba34487e5b1694b14970f684cc253b06bd1b6e9a.tar.gz perlweeklychallenge-club-ba34487e5b1694b14970f684cc253b06bd1b6e9a.tar.bz2 perlweeklychallenge-club-ba34487e5b1694b14970f684cc253b06bd1b6e9a.zip | |
[ch-076/jeongoon] minor bug fixed in ch-2.pl
| -rw-r--r-- | challenge-076/jeongoon/perl/ch-2.no-getOption.pl | 2 | ||||
| -rw-r--r-- | challenge-076/jeongoon/perl/ch-2.pl | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/challenge-076/jeongoon/perl/ch-2.no-getOption.pl b/challenge-076/jeongoon/perl/ch-2.no-getOption.pl index 76c47ad777..942a85f0b4 100644 --- a/challenge-076/jeongoon/perl/ch-2.no-getOption.pl +++ b/challenge-076/jeongoon/perl/ch-2.no-getOption.pl @@ -172,7 +172,7 @@ sub prepareGridData ($) { sub grepMatchedWordsRefWithSortedDataRef { my $dictWordsRef = $_[0]; - my $gridWordsRef = $_[1]; # XXX: this is kinda a copying + my $gridWordsRef = $_[1]; my ( $di, $gi ) = ( 0, 0 ); my @result; diff --git a/challenge-076/jeongoon/perl/ch-2.pl b/challenge-076/jeongoon/perl/ch-2.pl index 6af97307cd..4b6fc7761e 100644 --- a/challenge-076/jeongoon/perl/ch-2.pl +++ b/challenge-076/jeongoon/perl/ch-2.pl @@ -184,7 +184,7 @@ sub prepareGridData ($) { sub grepMatchedWordsRefWithSortedDataRef { my $dictWordsRef = $_[0]; - my $gridWordsRef = $_[1]; # XXX: this is kinda a copying + my $gridWordsRef = $_[1]; my ( $di, $gi ) = ( 0, 0 ); my @result; |