Assignment and printing at same time?

mkirank has asked for the wisdom of the Perl Monks concerning the following question:

How do i print as well as store the string to a variable

print $str<<SEPERATOR;
This is a string $xyz

SEPERATOR
[download]

Edit Masem 2002-01-24 - Changed title from "line seperator"

Comment on Assignment and printing at same time? Download Code

Replies are listed 'Best First'.
Re (tilly) 1: line seperator by tilly (Archbishop) on Jan 24, 2002 at 18:12 UTC
You can also print the assignment: `print $str = <<SEP; This is a string $xyz SEP` [download] As other people have suggested, you often should be scoping the string with my when you assign it. What that does is well-explained by Dominus in Coping with Scoping.	[reply] [d/l]
Re: line seperator by davis (Vicar) on Jan 24, 2002 at 18:05 UTC
How about: `my $somevar = <<SEP; Hello world SEP print $somevar;` [download] Cheers davis	[reply] [d/l]
Re: line seperator by Rich36 (Chaplain) on Jan 24, 2002 at 18:06 UTC
`my $str = <<SEPERATOR; This is a string $xyz SEPERATOR print $str;` [download] Rich36 There's more than one way to screw it up...	[reply] [d/l]