$ time perl -lanF, -e 'print join ",", @F[0..14];' numbers.csv > /dev/null real 0m9.880s user 0m9.716s sys 0m0.034s