Return to Answer

deleted 4 characters in body

edited Sep 2, 2017 at 14:05

edited Sep 2, 2017 at 14:05

Perl 5, 44 bytes

40 bytes code + 4 for -lF.

print map/$F[0]/?shift@F:$",A..Z while@F

40 bytes code + 4 for -lF.

print map/$F[0]/?shift@F:$",A..Z while@F

40 bytes code + 4 for -lF.

print map/$F[0]/?shift@F:$",A..Z while@F

answered Sep 2, 2017 at 13:31

answered Sep 2, 2017 at 13:31

40 bytes code + 4 for -lF.

print map/$F[0]/?shift@F:$",A..Z while@F