in reply to here document styling
andmy $text = <<"EOT" This is my text. EOT ;
are identical, and equal to:my $text = <<"EOT"; This is my text. EOT
Update: BTW, this lets you do weird things like this:my $text = "This\nis\nmy\ntext.\n";
while ( <<"EOT" =~ m/(.*is.*)/g ) This is my text, isn't it? EOT { print $1,"\n"; }
|
|---|