[Perl] $stringa = << "HEREDOC"

[Mich_]

Ti sei mangiato unpuntoevirgola:

use strict;
 use warnings; 
my $stringa = << "HEREDOC" 
Nel mezzo di cammin di nostra vita mi ritrovai per una selva oscura che la diritta via era smarrita 
HEREDOC 
;
print "$stringa\n";

oppure:

use strict;
 use warnings; 
my $stringa = << "HEREDOC" ;
Nel mezzo di cammin di nostra vita mi ritrovai per una selva oscura che la diritta via era smarrita 
HEREDOC 
print "$stringa\n";