Shell Programming and Scripting

for i in $(cat reference.txt)
do
  sed -i "s/$i/XXXXXXXXXXXXXXX/g" input      # if your sed don't support -i option, replace by below perl command
# or
  perl -i -pe  "s/$i/XXXXXXXXXXXXXXX/g" input 
done

for i in $(cat reference.txt)
do
  sed -i "s/$i/XXXXXXXXXXXXXXX/g" input      # if your sed don't support -i option, replace by below perl command
# or
  perl -i -pe  "s/$i/XXXXXXXXXXXXXXX/g" input > input.out (I got try this. But it is not worked :( )
done

awk '
NR==FNR {t=$0;gsub(/./,"x");a[t]=$0;next}
{
        for (i in a) if ($0~i) sub(i,a[i])
}1
' referral.data input.data