Merge pull request #7171 from Scimon/master

Sometimes you just wanna use the builtins

1 files changed, 6 insertions, 0 deletions

diff --git a/challenge-193/simon-proctor/raku/ch-1.raku b/challenge-193/simon-proctor/raku/ch-1.raku
new file mode 100644
index 0000000000..5c8ee086d2
--- /dev/null
+++ b/challenge-193/simon-proctor/raku/ch-1.raku
@@ -0,0 +1,6 @@
+#!/usr/bin/env raku
+
+#| Given a number n print all the zero padded binary strings of length n
+sub MAIN( UInt $n ) {
+     (^(2**$n)).map( { sprintf("\%0{$n}d", $_.base(2) ) } ).join(", ").say;
+}