my $variable = 1;
<<Comment;
la la la
comments comments everywhere
Comment
print $variable;