From cb2d6dbbdb61d677500032118ba3b43a67a18c74 Mon Sep 17 00:00:00 2001 From: deoac Date: Mon, 15 May 2023 21:21:52 -0400 Subject: Created template file for Challenges --- template.raku | 51 +++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 51 insertions(+) create mode 100644 template.raku (limited to 'template.raku') diff --git a/template.raku b/template.raku new file mode 100644 index 0000000000..85d9896ff3 --- /dev/null +++ b/template.raku @@ -0,0 +1,51 @@ +#! /usr/bin/env raku + +# Perl Weekly Challenge +# © 2023 Shimon Bollinger. All rights reserved. +# Last modified: Mon 15 May 2023 09:17:32 PM EDT +# Version 0.0.1 + +=begin pod +=TITLE +=head2 Task + +=SUBTITLE +=head2 Submitted by + +=CHALLENGE +=head2 + +=head3 Example 1: + +=head3 Example 2: + +=head3 Example 3: + +=head3 Example 4: + +=head3 Example 5: + +=SOLUTION + +=end pod + +# always use the latest version of Raku +use v6.*; + +sub my-sub () { +; +} # end of sub my-sub () + +multi MAIN (:$test! ) { + use Test; + + my @tests = [ + %{ input => (), output => Nil, text => 'Example ' }, + ]; + + for @tests { + is my-sub( . ), ., .; + } # end of for @tests +} # end of multi MAIN (:$test! ) + + -- cgit