package MyPackage;
use strict;
# Checking encoding warning is generated even on first line of POD
sub main {
print "This file contains no POD\n";
}
1;
=head1 TŨTORIAL
The encoding warning should only fire when the parser is 'in_pod' but that
should also be true on the first line of POD (above).