gleiche Referenzsubroutine für verschiedene Variablen ?

[$xNeTworKx]

Hallo,
Ich häng da bei einem kleinen Problem und zwar, ist es irgendwie möglich eine Subroutine zu verwenden, die 2 verschiedene Variablen "ausserhalb" ändern kann, also zB

aendere($text);

.
.
.
sub aendere  {
my $text = shift;
$$text =~ s/</</g;
$$text =~ s/>/>/g;
}

Was mache ich jetzt, wenn ich die gleiche Subroutine zB für aendere($thema); verwenden will ?
Danke schon mal im Voraus.

$xNeTworKx.