Thread Currying in Schleifen
(18 answers)
Opened by flowdy at 2012-11-06 22:47
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;
|