#!/usr/bin/perl

print map {chr ($_) . "\n"} 32 .. 126;

while (<>)
{
	print unless /^[ -\176]$/ || /^\357\277\275$/;
}

print "\357\277\275\n";
