From 2a9db8d64f865c526be31e7f1351f6bac350eac9 Mon Sep 17 00:00:00 2001
From: Mark Anderson <mark@andemark.io>
Date: Sat, 16 Nov 2024 16:02:09 +0000
Subject: ch-1.raku

---
 challenge-295/mark-anderson/raku/ch-1.raku | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 challenge-295/mark-anderson/raku/ch-1.raku

diff --git a/challenge-295/mark-anderson/raku/ch-1.raku b/challenge-295/mark-anderson/raku/ch-1.raku
new file mode 100644
index 0000000000..19ba697448
--- /dev/null
+++ b/challenge-295/mark-anderson/raku/ch-1.raku
@@ -0,0 +1,11 @@
+#!/usr/bin/env raku
+use Test;
+
+ok  word-break("weeklychallenge", <challenge weekly>);
+ok  word-break("perlrakuperl", <raku perl>);
+nok word-break("sonsanddaughters", <sons sand daughters>);
+
+sub word-break($str, @words)
+{
+    $str ~~ /^ [ @words ]* $/
+}
-- 
cgit