ascii-only: safely handle non-unicode characters

2013-11-20 22:00:43 +01:00 · 2013-11-20 22:00:43 +01:00 · 64906e2ffb
commit 64906e2ffb
parent 3d715ef18e
1 changed files with 2 additions and 1 deletions
--- a/lib/tools/ascii
+++ b/lib/tools/ascii
@ -4,11 +4,12 @@ ascii() {
 	coproc toascii {
 		perl -e '
 			use utf8;
+			use Encode;
 			use Text::Unidecode;
 			use open qw(:std :utf8);
 			$| = 1;
 			while (<>) {
-				print(unidecode($_));
+				print(unidecode(encode("utf-8", $_)));
 			}'
 	}
 }