perl - heredoc or multi-line string

my $string=<<EOT;
Louis
was
here
EOT

print $string;