perl -pe 's%REPLACE_HERE%'$p'%g' abc.txt > $p