innanzitutto mi scuso per non aver messo il titolo completo al topic, nn me ne ero accorto..
allora: io ho uno script che utilizzando il modulo Io::Socket si connette ad un $server. gli invia certi dati e il server di rimbalzo risponde dopo aver ricevuto questi.
io, già so la risposta quale sarà, ma di questa a me interessa solo una piccola parte, che sta fra parentesi. solitamente utilizzavo per "sgrossare" le risposte del server la stringa simile a questa:

while($risposta = <$sock>) {
if ($risposta =~ /([0-9a-f]{32})/) {
print " Hash is: $1";
}}

dove $sock è IO::Socket::INET->new(Proto=>"tcp", PeerAddr=>"$server", PeerPort=>"80").

in questo caso però sembra non funzionare ( ex: if($risposta =~ risp(PAROLA_DA_PRENDERE) ) )

al momento ancora non ho un codice vero e proprio...
spero di aver chiarito...