# Code does stuff here
my $foo = 7;

=pod

I set $foo to 7 here because 7 is the number of God. Don't
believe me? Well, then, $you eq 'numbskull'. So anyway, this
multiline "comment" really shouldn't be here.

=cut

# more code here

##</code><code>##

print "foo = $foo \n";

<<'END_COMMENT';

And then we print $foo. By the way, make sure you use single
quotes for this here document otherwise your @variables will 
wind up being interpolated. Except you shouldn't use this in
the first place, so the point is moot.

END_COMMENT

##</code><code>##

print "All done! I'm a bad hacker! \n";