perl -naF, -e '$,=",";$\="\n";@F[3]=pack("C*",unpack("n*",pack("H*",@F[3])));print @F' phonebook.csv > phonebook_neu.csv