Thread Perlcritic bzw. Perl Best Practice & rekursive Funktion (6 answers)
Opened by roli at 2009-10-03 14:38

Huelf
 2009-10-06 00:17
#126523 #126523
User since
2009-10-05
3 Artikel
BenutzerIn

user image
"Wer"s Codevorschlag ist noch am nähesten an Conways Vorstellungen von Wartbarkeit, auch weil die returns in der obersten Ebene stehen.

Grundsätzlich sollst du dich (gemäß "Best Practices") nicht darauf verlassen dass das Ergebnis der letzten Anweisung zurückgegeben wird, insbesondere wie hier bei einer rekursiven Funktion, weil du bei späteren Änderungen versehentlich etwas einfügen könntest oder das Ende der Funktion auf "unvorgesehenen" Wegen erreicht wird.

Deswegen lieber dort im Zweifelsfalle ein "nutzloses" Return einfügen, das einen Fehlerwert zurückgibt (meint Conway)

also dann in etwa sowas
Code: (dl )
1
2
3
4
5
6
7
8
9
10
...
if(($arg2 - $arg1) == 0) {
return ($arg2);
}
# erneute Rekursion
else {
return rekursion($arg1, $arg2);
}

return;


So weit ich ich erinnere... das lesen des Buches kann ich dir nicht abnehmen, mein Tag hat auch nur 24h.

Last edited: 2009-10-06 01:12:42 +0200 (CEST)

View full thread Perlcritic bzw. Perl Best Practice & rekursive Funktion