X-Git-Url: http://winboard.nl/cgi-bin?a=blobdiff_plain;f=po%2Fstrip-bad-utf8.pl;fp=po%2Fstrip-bad-utf8.pl;h=0000000000000000000000000000000000000000;hb=b10966961672512a212cc61192d0b08cf91c4c0c;hp=e282ad7aca9f728cd530bb9c23d44048687dc83d;hpb=e147dd97d26b46902200491dbe0a8755266555d3;p=xboard.git diff --git a/po/strip-bad-utf8.pl b/po/strip-bad-utf8.pl deleted file mode 100755 index e282ad7..0000000 --- a/po/strip-bad-utf8.pl +++ /dev/null @@ -1,14 +0,0 @@ -#! /usr/bin/perl -# -# Strip off utf8 encoding that was spuriously applied to a string of -# 8-bit bytes. Note: This may be totally bogus. If you get any "Wide -# character in print" messages, then the input was not a string of -# 8-bit bytes that had utf8 encoding applied to it -- the message -# means that utf8 decoding produced some characters > 0xff. - -binmode STDIN, ':encoding(UTF-8)'; -binmode STDOUT, ':raw'; - -while (<>) { - print $_; -}