Imprimer un texte de plusieurs lignes

Utiliser la comande print associé à un marqueur de fin de texte (attention à l'utilisation des point virgule) :

#!/usr/local/bin/perl

use strict;

print <<STOP;
Mignone allons voir si la rose,
Qui ce matin avait eclose,
STOP

print "\nAutre fonction\n";

__END__