diff options
| -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; |