O'Reilly logo

Einführung in Perl, Sixth Edition by brian d foy, Tom Phoenix, Randal L. Schwartz

Stay ahead with the world's most comprehensive technology and business learning platform.

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, tutorials, and more.

Start Free Trial

No credit card required

Der return-Operator

Was ist, wenn Sie Ihre Subroutine direkt anhalten wollen? Der Operator return gibt sofort bei seinem Aufruf einen Wert aus einer Subroutine zurück.

my @namen    = qw/ Fred Barney Betty Dino Wilma Pebbles Bam-Bam /;
my $ergebnis = &welches_element_ist("Dino", @namen);

sub welches_element_ist {
  my($was, @array) = @_;
  foreach (0..$#array) {  # Indizes der Elemente von @array
    if ($was eq $array[$_]) {
      return $_;   # richtiges Element gefunden, Wert sofort zurückgeben
    }
  }
  -1;              # Element nicht gefunden (return ist hier optional)
}

Sie fordern diese Subroutine auf, im Array @namen den Index von Dino zu finden. Zuerst wird mit my eine Parameterliste deklariert: Es gibt das $was, nach dem wir suchen, und ein @array von Werten, in dem gesucht ...

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, interactive tutorials, and more.

Start Free Trial

No credit card required