
my $x = 1;

# =head1 Foo
#
# This is mid-code!
#
# =cut

my $y = 2;

__END__

=pod

=head1 Foo

This is mid-code!

=cut
