#!/usr/bin/perl

use strict;
use warnings;

my $c = chr 0xC9;
print "Content-Type: text/plain; Charset=ISO-8859-5\n\n $c";
# Щ