2016 Update

2016-12-05 22:15:40 +01:00 · 2016-12-05 22:15:40 +01:00 · dcf5d15da3
commit dcf5d15da3
parent 948b86eafa
7965 changed files with 139854 additions and 31002 deletions
--- a/Task/CSV-data-manipulation/Tcl/csv-data-manipulation-1.tcl
+++ b/Task/CSV-data-manipulation/Tcl/csv-data-manipulation-1.tcl
--- a/Task/CSV-data-manipulation/Tcl/csv-data-manipulation-2.tcl
+++ b/Task/CSV-data-manipulation/Tcl/csv-data-manipulation-2.tcl
@ -0,0 +1,6 @@
+set f [open example.csv r]
+puts "[gets $f],SUM"
+while { [gets $f row] > 0 } {
+	puts "$row,[expr [string map {, +} $row]]"
+}
+close $f