REPLACE STRING WITH PERL

perl -p -i -e 's/replace this/using that/g' 

Example

perl -p -i -e 's/5435028417/XXXXX/g'  "filename"

Old Data was :

286026936111961~5435028417~21671463~~25MAR-

New Data will be :

286026936111961~XXXXX~21671463~~25MAR-