pass-by-reference in Perl ???

[Calocybe]

Tag Bernhard!

Gibts irgendsowas ähnliches wie pass by reference auch in Perl?

Klar doch, geht mit... Referenzen (na sowas *g*). Die erzeugt man in Perl mit einem \ vor der Variablen. Also
$susi_ref = $susi;     # Eine Referenz ist selbst wiederum ein Skalar

Dereferenzieren fuer Skalarreferenzen mit voranstellen eines weiteren $:
$$susi_ref = "susi";

Genaueres findest Du natuerlich in den perldocs, insbesondere perlre.

// sub schlag { $_[0] =~ s/\w/_mit_dem_blauen_auge/g; return $_[0]; }

also irgendwas wie:

// $susi = "susi";
// $strolchi = "strolchi";
// schlag($susi, $strolchi);

sub schlag {
    my $x;
    
    while ($x = shift()) {
        $$x =~ s/\w/_mit_dem_blauen_auge/g;
    }
}

So long