Hallo,
Naja, das ist kein Perl Style. Es ist zwar nicht falsch, aber Perl bietet wesentlich schönere Möglichkeiten Schleifen zu bauen.
Da hast du wohl recht.
foreach my $s ( @sockets)
{
undef $s if $socket == $s;
}
ist das `==`{:.language-perl} ein Tippfehler? Hier bräuchte man doch `eq`{:.language-perl}, oder?
mfG,
steckl