Re: [MacPerl] Client/Server Interactions

[Ronald J Kimball]

On Thu, Jun 21, 2001 at 10:16:32AM -0400, Adam Stern wrote:

>     while(1<2) {
>       while (<Client>) {
>         push(@cli_in,$_);
>       }

This will keep reading input until the connection to the client closes.

>       while(<$remote>) {
>         push(@serv_in,$_);
>       }

This will keep reading input until the connection to the remote server
closes.

You need to use select (or IO::Select).  See perlipc for more info.


Ronald