.pick(1) returns a List now. Change to .pick

Author: andreoss

categories/best-of-rosettacode/create-a-two-dimensional-array-at-runtime.pl

@@ -22,9 +22,9 @@ =head1 More
 my ($major, $minor) = prompt("Dimensions? ").comb(/\d+/);
 die "Please enter two dimensions" unless $major && $minor;
 
-my @array := [ for ^$major { [ for ^$minor {'@'} ] } ];
+my @array := [ for ^$major { [ for ^$minor { '@' } ] } ];
 
-@array[ pick 1, ^$major ][ pick 1, ^$minor ] = ' ';
+@array[ (^$major).pick  ][ (^$minor).pick ] = ' ';
 
 .say for @array;