Plan 9 from Bell Labs’s /usr/web/sources/contrib/gabidiaz/root/sys/src/cmd/perl/t/lib/warnings/doop

# doop.c
use utf8 ;
$_ = "\x80  \xff" ;
chop ;
EXPECT
########