$info1 = "this is some sample stuff".$info_in."<br><br>";

print <<__ENDER__;
$info1
.
.
__ENDER__

##</code><code>##

print <<__ENDER__;
this is some sample stuff $info_in <br><br>
.
.
__ENDER__

##</code><code>##

$info[1] = "this is some sample stuff $info_in <br><br>";
..
foreach my $outfo ( @info ) {
   print "$outfo\n";
}