# encoding: Cyrillic
# This file is encoded in Cyrillic.
die
"This file is not encoded in Cyrillic.\n"
if
q{ }
ne
"\x82\xa0"
;
use
Cyrillic;
"1..1\n"
;
my
$__FILE__
= __FILE__;
if
(
' A¢'
=~ / [^-]¢/) {
"ok - 1 $^X $__FILE__ (' A¢' =~ / [^-]¢/)\n"
;
}
else
{
"not ok - 1 $^X $__FILE__ (' A¢' =~ / [^-]¢/)\n"
;
}
__END__