RosettaCodeData/Task/Middle-three-digits/Raku/middle-three-digits-2.raku
2023-07-01 13:44:08 -04:00

1 line
94 B
Raku

for [\~] ^10 { say "$_ => $()" if m/^^(\d+) <(\d**3)> (\d+) $$ <?{ $0.chars == $1.chars}> / }