while (my $recv = <$client>) { process_incoming($recv); }