Task2 done

1 files changed, 12 insertions, 0 deletions

diff --git a/challenge-110/luca-ferrari/raku/ch-2.p6 b/challenge-110/luca-ferrari/raku/ch-2.p6
new file mode 100644
index 0000000000..b388913a7f
--- /dev/null
+++ b/challenge-110/luca-ferrari/raku/ch-2.p6
@@ -0,0 +1,12 @@
+#!raku
+
+sub MAIN( Str $file-name = 'people.txt' ) {
+
+    my @content;
+    @content.push: .split( ',' ) for $file-name.IO.lines;
+
+    for 0 ..^ @content[ 0 ].elems -> $column {
+        my @row.push:  @content[ $_ ][ $column ] for 0 ..^ @content.elems;
+        @row.join( ',' ).say;
+    }
+}