perl -ne"chomp; print $_,',',(split ',',<STDIN>)[-1]" in1.csv < in2.csv >out.csv