for i in *.html; do perl -wpi.bak -e 's/oldusr\@olddomain/newusr\@newdomain/g' $i; done