From e508071f909a22e0a9bd4bfe73f6f17ea6ba4641 Mon Sep 17 00:00:00 2001
From: James Smith <js5@sanger.ac.uk>
Date: Mon, 26 Dec 2022 14:38:48 +0000
Subject: Update ch-1.pl

---
 challenge-197/james-smith/perl/ch-1.pl | 1 +
 1 file changed, 1 insertion(+)

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{!$_}@_}
-- 
cgit