From 0310f70d5102cb73bf8d677e2641c1c7e0acf764 Mon Sep 17 00:00:00 2001 From: Luca Ferrari Date: Mon, 26 Apr 2021 09:51:02 +0200 Subject: Use map to compelte task 2 --- challenge-110/luca-ferrari/raku/ch-2.p6 | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/challenge-110/luca-ferrari/raku/ch-2.p6 b/challenge-110/luca-ferrari/raku/ch-2.p6 index b388913a7f..ed01afe516 100644 --- a/challenge-110/luca-ferrari/raku/ch-2.p6 +++ b/challenge-110/luca-ferrari/raku/ch-2.p6 @@ -5,8 +5,12 @@ 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; - } + # for 0 ..^ @content[ 0 ].elems -> $column { + # my @row.push: @content[ $_ ][ $column ] for 0 ..^ @content.elems; + # @row.join( ',' ).say; + # } + + my @transposed.push: @content.map: *[ $_ ] for 0 ..^ @content[ 0 ].elems; + $_.join( ',' ).say for @transposed; + } -- cgit