No, what you want is

$var=<<BLAH;

print "Blah";

BLAH

eval $var;
[download]

Because when it executes it it will print Blah out on the screen because you have print "Blah"; already inside $var;

UPDATE:WOULD SOMEONE MIND TELLING ME WHAT IS SO WRONG ABOUT THIS POST THAT I GOT A -- ON IT?? THIS IS SO *beeping* REDICULOUS. CONSTANTLY BEING ATTACKED.

Tiptoeing up to a Perl hacker.
Dave AKA damian