Help for this page
C:\>perl -lne "BEGIN{$,=','} print+(split',',$_)[0..14] " > junk
C:\>perl -lanF, -e "BEGIN{ $,=\",\"} print @F[0..14];" numbers.csv > j +unk