grep

[steckl]

Hallo,

ich habe diese anweisung

@sockets = grep !/$socket/, @sockets;

in @sockets steht sowas in der art : IO::Socket::INET=GLOB(0x861710)

in $socket: IO::Socket::INET=GLOB(0x861710)

und $socket soll von den array gelöscht werden dies geht aber nicht kennt jemand ne antwort

ich würde es so lösen:

  
for ( my $i = 0; $i < @sockets; $i++)  
{  
    if ( $socket eq $sockets[$i] )  
    {  
        undef $sockets[$i];  
    }  
}  

mfG,
steckl