RosettaCodeData/Task/CSV-data-manipulation/Maple/csv-data-manipulation-1.maple

M := ImportMatrix("data.csv",source=csv);
M(..,6) := < "Total", seq( add(M[i,j], j=1..5), i=2..5 ) >;
ExportMatrix("data_out.csv",M,target=csv);