sub test
{
out "das ist ein Test";
}

sub test
{
$test = "das ist ein Test";
}

sub test
{
my $test = "das ist ein Test";
}

sub test
{
my $test = "das ist ein Test";
return ($test)
}

sub test
{
my $test = "das ist ein Test";
$testa = $test;
return ($testa)
}
gibt er testa zurück - nur ist halt dann das testa ab dem Zeitpunkt im Hauptscript mit dem Wert aus der Sub belegt bis der Inhalt der var testa irgendwo wieder manipuliert wird, das gleiche passiert aber auch ohne return

out<<EOF;
<table>
<tr><td colspan=3>Hier steht was drin</td></tr>
${&trennzeile(cs, h, f)}#cs,h,f mit Werten belegt bzw. vars
<tr><td colspan=3>Hier steht was andres drin</td></tr>
</table>
EOF
und hier die sub:
sub trennzeile
{my $colspan=$_[0];my $hoehe=$_[1];my $farbe=$_[2];
my $tz = <tr><td colspan=$colspan bgcolor=$farbe><img src=$pix heigth=$heohe></td></tr>;
return ($tz)
}
kriegs einfach nicht hin. Ist ja auch zusätzlich ein Prob, daß trennzeile() im aufrufenden Teil ständig andere Werte übergibt, je nach Layout, und die var $tz irgendwie in ihrer Gültigkeit nur "einmalig" sein sollte.