aboutsummaryrefslogtreecommitdiff
path: root/challenge-087
diff options
context:
space:
mode:
authordrbaggy <js5@sanger.ac.uk>2020-11-25 08:58:43 +0000
committerdrbaggy <js5@sanger.ac.uk>2020-11-25 08:58:43 +0000
commit783f4bed20188b8713c558e0e501d037a90f58af (patch)
tree41c8b2f571a3e68e9803bead9d9fc659d4f0bc66 /challenge-087
parent89360d10a5f2c28dfaa7524a737129ebe9dbd23a (diff)
downloadperlweeklychallenge-club-783f4bed20188b8713c558e0e501d037a90f58af.tar.gz
perlweeklychallenge-club-783f4bed20188b8713c558e0e501d037a90f58af.tar.bz2
perlweeklychallenge-club-783f4bed20188b8713c558e0e501d037a90f58af.zip
pushing changes
Diffstat (limited to 'challenge-087')
-rw-r--r--challenge-087/james-smith/perl/ch-1.pl16
-rw-r--r--challenge-087/james-smith/perl/ch-2.pl16
2 files changed, 32 insertions, 0 deletions
diff --git a/challenge-087/james-smith/perl/ch-1.pl b/challenge-087/james-smith/perl/ch-1.pl
new file mode 100644
index 0000000000..930d91cc65
--- /dev/null
+++ b/challenge-087/james-smith/perl/ch-1.pl
@@ -0,0 +1,16 @@
+#!/usr/local/bin/perl
+
+use strict;
+
+use warnings;
+use feature qw(say);
+use Test::More;
+
+is( my_function(), 1 );
+
+done_testing();
+
+sub my_function {
+ return 1;
+}
+
diff --git a/challenge-087/james-smith/perl/ch-2.pl b/challenge-087/james-smith/perl/ch-2.pl
new file mode 100644
index 0000000000..930d91cc65
--- /dev/null
+++ b/challenge-087/james-smith/perl/ch-2.pl
@@ -0,0 +1,16 @@
+#!/usr/local/bin/perl
+
+use strict;
+
+use warnings;
+use feature qw(say);
+use Test::More;
+
+is( my_function(), 1 );
+
+done_testing();
+
+sub my_function {
+ return 1;
+}
+