/trunk/lfs/obfuscate.sh |
---|
30,7 → 30,7 |
for i in `grep -o '"mailto:.*@.*"' ${1} |sed -e 's|^"mailto:||' -e 's|"$||'`; do |
link=`echo $i | perl -pe 's/[^\n]/"\\\&#".ord($&)."\;"/ge'` |
plaintext=`echo $i | sed -e 's|@| AT |' -e 's|\.| D0T |g'` |
cp ${1}{,.tmp} |
cp ${1} ${1}.tmp |
sed -e "s|mailto:$i|mailto:$link|" \ |
-e "s|$i|$plaintext|" ${1}.tmp > ${1} |
rm ${1}.tmp |