diff options
| -rw-r--r-- | challenge-118/james-smith/perl/ch-2.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/challenge-118/james-smith/perl/ch-2.pl b/challenge-118/james-smith/perl/ch-2.pl index fb4985349f..5e1d821aae 100644 --- a/challenge-118/james-smith/perl/ch-2.pl +++ b/challenge-118/james-smith/perl/ch-2.pl @@ -105,6 +105,7 @@ sub walk_trans { ## Try all knight move squares from the current ## square. } + sub get_trans { my $q=[]; foreach my $y (0..7) { |