perl -F, -ane 'local $,=q(,); print scalar localtime($F[0]), @F[1..$#F] '