Hi, On 01.10.2016 19:57, mimosinnet wrote: > I have been searching on how to sort multidimensional arrays. The > following code works and sorts the fourth column of the array: > > --- > #!/usr/bin/env perl6 > # sort multidimensional array > > my @opposite = ( > <8976 ABD AB11 6LX NJ >, > <8860 PLN AB12 4JS NO >, > <8905 DYC AB21 7EQ NJ >, > <8964 STN AB39 2NE NO >, > ); > > for @opposite -> $line { say $line; } > say "-" x 22; > @opposite = @opposite.sort({@$^a[3]});
For the record, you can simplify this a bit: @opposite = @opposite.sort(*[3]); > for @opposite -> $line { say $line; } > --- > > I have adapted this from: > http://www.wellho.net/resources/ex.php?item=p600/mapper > > I wanted to ask about the syntax, buy I have understood it while > writing the message ;) :D I've had the same experience a few times :-) Cheers, Moritz -- Moritz Lenz https://deploybook.com/ -- https://perlgeek.de/ -- https://perl6.org/