aboutsummaryrefslogtreecommitdiff
path: root/challenge-197/james-smith/perl/ch-1.pl
diff options
context:
space:
mode:
Diffstat (limited to 'challenge-197/james-smith/perl/ch-1.pl')
-rw-r--r--challenge-197/james-smith/perl/ch-1.pl1
1 files changed, 1 insertions, 0 deletions
diff --git a/challenge-197/james-smith/perl/ch-1.pl b/challenge-197/james-smith/perl/ch-1.pl
index 84b80e2164..f220e8c6b7 100644
--- a/challenge-197/james-smith/perl/ch-1.pl
+++ b/challenge-197/james-smith/perl/ch-1.pl
@@ -13,5 +13,6 @@ my @TESTS = (
);
is( "@{[ move_zero(@{$_->[0]}) ]}", $_->[1] ) for @TESTS;
+done_testing();
sub move_zero{grep({$_}@_),grep{!$_}@_}