$ perl -nE'ord()>127 and print for split"",$_' *iso | wc -c 32 #### $ ls -l messages.js.* -rw-r--r-- 1 tanktalus tanktalus 2490 Dec 20 20:57 messages.js.iso -rw-r--r-- 1 tanktalus tanktalus 2522 Dec 20 20:58 messages.js.utf8 #### $ perl -nE'ord()>127 and print for split"",$_' *utf8 | wc -c 64