Thread Currying in Schleifen (18 answers)
Opened by flowdy at 2012-11-06 22:47

flowdy
 2012-11-06 23:23
#163098 #163098
User since
2012-08-03
45 Artikel
BenutzerIn

user image
Um mir mal selbst zu antworten: Der inverse Ansatz mit

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
sub Node::climber {
    my $p = shift;
    return sub {
        return $p = $p->parent_row
    };
}

# dann ...
my $climber = $node->climber;
while ( my $node = $climber->() ) {
    # ...
}


geht natürlich auch. Ist das klarer bzw. gibt es noch was besseres, etwas, das ganz ohne zusätzliche Variable auskommt? Das man mit beiden Ansätzen auf sie verzichten kann, ist mir klar, damit verzichtet man aber auch auf den bedingten Abbruch der Traversierung.

Viele Grüße,
flowdy
package MyClass; sub new {\b\b\b\b\b\b\b\b\buse Moose;

View full thread Currying in Schleifen