2 files changed, 16 insertions, 0 deletions
diff --git a/challenge-048/markus-holzer/raku/ch-1.p6 b/challenge-048/markus-holzer/raku/ch-1.p6
new file mode 100644
index 0000000000..e9627c6844
--- /dev/null
+++ b/challenge-048/markus-holzer/raku/ch-1.p6
@@ -0,0 +1,9 @@
+my @circle = (1..500);
+
+while @circle.elems > 1
+{
+    my $offset = @circle.elems %% 2 ?? 0 !! 1;
+    @circle = @circle[ $offset, { $_ + 2 } ... * ];
+}
+
+say "Survivor: #", @circle.first;
diff --git a/challenge-048/markus-holzer/raku/ch-2.p6 b/challenge-048/markus-holzer/raku/ch-2.p6
new file mode 100644
index 0000000000..6b52c7156b
--- /dev/null
+++ b/challenge-048/markus-holzer/raku/ch-2.p6
@@ -0,0 +1,7 @@
+my $formatter = sub { sprintf '%02d%02d%04d', .month, .day, .year given $^date }; 
+
+.say for (2000..2099)
+    .grep({ 
+        0 < $^year.substr(2,2).flip < 12 })
+    .map({ 
+        Date.new($^year, |$year.flip.comb(2), :$formatter ) });
+\ No newline at end of file