perl -ane 'm/^total/ ? shift @F:$.==1 or next; print join(",",@F),"\n"' INPUT-FILE-NAME.TXT