in reply to multibyte match works with tr but not in perl??
% perl -pi.bak -e "s/[[:^print:]]//g" `find /home -name "*.html"` [download]