Fix encoding.

Signed-off-by: Thomas Hochstein <thh@thh.name>

mew.pl

@@ -17,10 +17,9 @@ my $input = join (' ',@ARGV);
 utf8::decode($input);
 
 if ($input =~ /[\x80-\x{ffff}]/o) {
-   $output = encode('MIME-Q', $input);
-   $output =~ s/=20/_/g;
+   print encode('MIME-Q', $input);
 } else {
-   $output =  decode('MIME-Q', $input);
+   print decode('MIME-Q', $input); 
 };
 
-print "$output\n";
+print "\n";