Am Sonntag, 16. Januar 2005 14:22 schrieb Daniel Feist:
%ganzer_name = ("Fred" => "Feuerstein", "Barney" => "Geroellheimer", );
# Schreibe die Schlüssel in ein Array my @vornamen = keys %ganzer_name; # Schreibe den Index des letzten Elements in einen Skalar my $last_element = $#vornamen; # Oder: Schreibe die Anzahl der Elemente in einen Skalar my $num_elements = @vornamen; # Jetzt kannst du den Zufallsgenerator einsetzen my $vorname = $vornamen[rand($num_elements)]; my $nachname = $ganzer_name{$vorname}; Lies dir mal die Manual-Page perlintro durch. Dort werden die die Grundlagen der Perl-Syntax kurz und knapp erklärt. Anschließend bietet sich das "perlreftut" an. Es erklärt den grundlegenden Umgang mit Referenzen. Gruß, Dennis -- Send personal mail to dennis@... only. Mails going to lists@stosberg.net will not reach me unless they are sent over the list.