Problem 59

 1my @letters = (97..122).map(*.chr).combinations(3).flatmap(*.permutations).rotor(3);
 2my @cipher-text = slurp.split(",");
 3my $string = '';
 4for @letters -> @letter-combination {
 5    $string = ((@letter-combination>>.ord xx *).flat Z+^ @cipher-text)>>.chr.join;
 6    last if $string.contains(all <and can he be in was>);
 7} 
 8say $string; 
 9print "\n\n";
10say [+] $string.comb>>.ord;