open(my $h1, "nc server.com 12345|");
open(my $h2, "nc server.com 6789|");
# now call the above I/O handler loop