||/home/xx> perl -p -i -e 's/^(.{10})(.{382})(.*)$/$1^$2^$3/' test.txt
||/home/xx>