
my $x = 1;

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

my $y = 2;

# =head1 Bar
#
# This is post-code!
#
# =cut

__END__

=pod

=head1 Foo

This is mid-code!

=cut

=head1 Bar

This is post-code!

=cut
