find . -type f -exec grep "<object" {} ; -print | grep -E "^/" | perl do_embed.pl