# [Perl 6], 42 bytes <!-- language-all: lang-perl6 --> *.tclc.&{$_~'y'x!/y$/~" Mc{S/e?y$//}face"} [Try it online!][TIO-jf9xwrqk] [Perl 6]: https://github.com/nxadm/rakudo-pkg [TIO-jf9xwrqk]: https://tio.run/##K0gtyjH7n1upoJamYPtfS68kOSdZT61aJb5OvVK9QlG/UkW/TknBN7k6WD/VHsjRr01LTE5Vqv1vzVWcWKmQpqESr6mQll@kYJOUn1ii4AaUVHDxdwcycjNzKhV8ElMqFVzy87JTK@3@AwA "Perl 6 – Try It Online"