Purge trailing whitespace

categories/euler/prob059-andreoss.pl

@@ -67,7 +67,7 @@ sub infix:<XOR>(@cipher, @password) {
 
 	my @password  = @chunk[^3] XOR @word;
 	my $count =  [+] do for @common-words.grep({$_ !~~ $w}) -> $word {
-	    elems $decrypted ~~ m:g:i/$word/ 
+	    elems $decrypted ~~ m:g:i/$word/
 	}
 
 	%tries{$password} += $count if $count > 0;
@@ -89,7 +89,7 @@ (Bool :$verbose = False, :$file = 'cipher.txt', :$word = @common-words[0], :$pas
 	$pass  = %variants.max(*.value).key;
 	say "The password is more likely to be '$pass'. " if $verbose;
     }
-        
+
     my $decrypted =  as-word @cipher XOR as-code($pass);
 
     say "The message: {$decrypted.perl}" if $verbose;

categories/euler/prob100-andreoss.pl

@@ -22,7 +22,7 @@
 my $total = 21;
 
 ( $blue ,
-  $total ) =  3 * $blue + 2 * $total - 2, 
+  $total ) =  3 * $blue + 2 * $total - 2,
               4 * $blue + 3 * $total - 3
       while $total <= 10 ** 12 ;