#!/bin/bash

ascii() {
	coproc toascii {
		perl -e '
			use utf8;
			use Encode;
			use Text::Unidecode;
			binmode STDIN, ":encoding(UTF-8)";
			$| = 1;
			while (<>) {
				print(unidecode($_));
			}'
	}
}