perl -pi.bak -e 's#\0#,#g' file1.txt