RosettaCodeData/Task/CSV-data-manipulation/PicoLisp/csv-data-manipulation.l
2023-07-01 13:44:08 -04:00

4 lines
122 B
Common Lisp

(in "data.csv"
(prinl (line) "," "SUM")
(while (split (line) ",")
(prinl (glue "," @) "," (sum format @)) ) )