subroutine mit foreach schleife - #76720 (Allgemeines zu Perl)

lichtkind

2007-05-14 21:30

User since
2004-03-22
5697 Artikel
ModeratorIn + EditorIn

ne so wird das nichts, das ruft nach einer closure oder einer state variable wenn du ein bleed perl hast

Code (perl): (dl )

sub beispiel {
    my $zaehler;
    @array= (was, wie,wo,wann,wozu,wieso);
    return = sub {
        $zaehler = 0 if scalar @array > $zaehler;
        return $array[$zaehler++];
    }
}
$frager = beispiel();
$erste_antwort = $frager();
$zweite_antwort = $frager();

das ganze geht auch noch wesentlich einfacher wenn nur von einer stelle aus gefragt wird. dieses beispiel würde halt auch gehen wenn verschiedene fragesteller durcheinander fragen und bei jeder anfrage immer das jewails nächste element des arrays bekommen. du sagtest noch nicht was geschehen soll wenn das letzte erreicht ist.\n\n

Tutorien in der Wiki, mein zeug:
kephra, baumhaus, garten, gezwitscher

Es beginnt immer mit einer Entscheidung.