in reply to Assignment and printing at same time?

How about:
my $somevar = <<SEP; Hello world SEP print $somevar;

Cheers
davis