RosettaCodeData/Task/Arrays/TXR/arrays.txr

8 lines
111 B
Plaintext

@(collect)
@line
@(bind f @(split-str line ","))
@(output)
@{f[-1]}@\t@{f[1..-1] "\t"}@\t@{f[0]}
@(end)
@(end)