[Perl] Procesos en perl

[H008]

hola a todos.. 
bueno tengo un  problemita que no se como solucionarlo, lo explico 
a continuacion:

el problema es que nesesito tener dos bucles corriendo al mismo tiempo
y que las respuestas de uno de ellos no choquen con las del otro
y que ademas las respuestas de los bucles me las muestre en la pantalla
un ejemplo seria lo siguiente:

while(<sock1>){chop($_);
if ($_=~/mi_parametro/){print "mi respuesta\n";}
}

bueno como ya saben el socket al conectar queda conectado y esperando respuestas
es decir el siclo no se acaba hasta que el socket se desconecte.

el otro siclo es el siguiente
while(<stdin>){chop($_);
if($_=~/mi_comando/){print"mi_respuesta\n";}
}

este otro siclo queda esperando y tampoco se termina . es decir queda
esperando hasta que le introdusca algo por teclado. y luego se repite nuevamente.

AHORA... nesesito que estos 2 siclos esten trabajando paralelamente
por que nesesito capturar en tiempo real las respuestas del socket y 
ademas que cuando quiera ingresarle un parametro por teclado, lo aga sin estropear
el siclo del socket...

osea la idea seria separar estos 2 siclos en 2 procesos distintos.. para que
asi trabajen al mismo tiempo... y no secuencial mente..

cual quier aporte es aceptado..

GRACIAS