Remove return of sorted strings

Strings were being returned in ascending order but they don't need to. They
keep the same ordering in which they were passed in.

1 files changed, 2 insertions, 3 deletions

diff --git a/challenge-008/uzluisf/perl6/ch-2.p6 b/challenge-008/uzluisf/perl6/ch-2.p6
index 5eb95dde4f..c69ad6543d 100644
--- a/challenge-008/uzluisf/perl6/ch-2.p6
+++ b/challenge-008/uzluisf/perl6/ch-2.p6
@@ -10,9 +10,8 @@ return the modified lines.
 =end comment
 
 sub center( *@strings --> List ) {
-    my @sorted  = @strings.sort({.chars});
-    my $max-len = @sorted.tail.chars;
-    return @sorted.map({
+    my $max-len = @strings.sort({.chars}).tail.chars;
+    return @strings.map({
         ( ' ' x (.chars - $max-len).abs div 2, $_).join
     }).list;
 }