my $str = <<=cut;

=head2 Some documentation

=cut