Podczas przeglądania CPAN natknąłem się na blok kodu w this module, który mnie zaskoczył.Dlaczego warto używać bloku "do {} jeśli" w Perlu?
sub import {
for my $mod (keys %INC) {
do {
delete $INC{$mod};
$mod =~ s/\.pm$//; $mod =~ s/\//::/g;
delete_package($mod);
} if $mod =~ m/^SOAP/;
}
}
Dlaczego autor użyć do {} if bloku zamiast regularnej if bloku?
Bo im się podoba. Nie ma prawdziwej różnicy. Perl ma aż tuzin sposobów na zrobienie wszystkiego. Tak po prostu jest język.
+1 Zawsze lubię słuchać "dlaczego nie?". – fncomp
Ponieważ w Perl „Jest więcej niż jeden sposób, aby to zrobić”
Dla mnie wydaje się sposób, aby podkreślić kod wewnątrz bardziej niż sam stan ifif.
Autor chciał użyć, jeśli na końcu, ale musi być na końcu jednego zdania niewiele. A do {} jest jednym stwierdzeniem, więc to zadziała.
Osobiście użyłbym instrukcji if, ale to kwestia gustu, czy nacisk powinien być na akcję, czy stan. W tym przypadku autor postanowił podkreślić akcję.
(+1) Uważam, że pisanie "Zrób coś, jeśli coś innego" jest dla mnie bardzo mylące, tak jak mówię: "Zatrzymuję się w domu ** każdego dnia ** (chyba że jest to dzień roboczy) _" – Gonen
Jedną z różnic jest to, że do { ... } zwraca wartość podczas gdy if nie (chociaż zobaczyć komentarze poniżej).
np
my $x = 3;
my $z = do { warn "in the do block"; 10 } if $x == 3;
można osiągnąć prawie to samo z trójskładnikowego operator, chociaż nie można sekwencyjnie wprowadzać instrukcji wewnątrz gałęzi operatora trójskładnikowego.
jeśli zwroty są zbyt powracające wartości. Po prostu nie możesz ich przypisać bezpośrednio, ponieważ składnia jest trochę trudna. Ale jeśli umieścisz go poprawnie, zobaczysz, że jeśli zwraca wartość. Oto odpowiednik kodu: 'my $ z = do {if ($ x == 3) {warn" w bloku do "; 10}}' Twój kod jest jednak bardziej zwięzły, więc nadal uważam, że jest rozsądna odpowiedź, po prostu nie do końca poprawna pod względem technicznym. –
Zgadzam się - to bardziej poprawny sposób patrzenia na sytuację. – ErikR
Te dwa przykłady są identyczne z Perl .... –
Acme namespace. Dlaczego oczekujesz zdrowego rozsądku? :) – Hugmeir
Osobiście użyłbym 'for my $ mod (keys% INC) {next if $ mod! ~/^ SOAP /; ...} '. Określa kryteria pętli z góry i unika poziomu wcięcia jako premii. – ikegami
@Hugmeir haha - to jest całkowicie poprawna odpowiedź, powinieneś ją przesłać :) –