perl -F, -aple"$F[-1]=sprintf'%05d',$F[-1]; $_=join',',@F" in.csv