Task 2 done

1 files changed, 7 insertions, 0 deletions

diff --git a/challenge-114/luca-ferrari/raku/ch-2.p6 b/challenge-114/luca-ferrari/raku/ch-2.p6
new file mode 100644
index 0000000000..876d7a2724
--- /dev/null
+++ b/challenge-114/luca-ferrari/raku/ch-2.p6
@@ -0,0 +1,7 @@
+#!raku
+
+
+sub MAIN( Int $N where { $N > 0 } ) {
+    say $_ and exit if ( $N.base( 2 ).split( '' ).grep( '1' ).elems == $_.base( 2 ).split( '' ).grep( '1' ).elems ) for $N ^.. Inf;
+
+}