use strict;
use warnings FATAL => qw#all#;
use utf8;

*STDERR = *STDOUT;

#print qq#content-type: text/plain; charset=UTF-8\n\n#;

warn q#warn: ϗblah頁#; # no error.
print q#print: ϗblah頁#; # wide char error still.