my $var1 = "foo";

my $here_is = <<SOME_TEXT;

    I want to print something 
    with a value $var1
    and some other text load
    etc etc

SOME_TEXT

print $here_is;
print "\n";