RosettaCodeData/Task/Here-document/Perl/here-document-6.pl

sub flibbertigibbet {
    print <<~END;
        Mary had
          a little
        lamb
        END
}