16 lines
214 B
Bash
16 lines
214 B
Bash
#!/bin/bash
|
|
|
|
ascii() {
|
|
coproc toascii {
|
|
perl -e '
|
|
use utf8;
|
|
use Encode;
|
|
use Text::Unidecode;
|
|
use open qw(:std :utf8);
|
|
$| = 1;
|
|
while (<>) {
|
|
print(unidecode(encode("utf-8", $_)));
|
|
}'
|
|
}
|
|
}
|