Hallo Cruz
Zweite Variante:
Du definierst die Variable im globalen Namensraum und veränderst sie in der Subroutine:
$var = "";
&uprog();
print $var; # gibt '1' aus.
sub uprog
{
$var = 1;
}
Ist dann nützlich, wenn mehrere Werte verändert und zurückgegeben werden müssen.
Grüsse
Tom