# child close(SOCK_READ); open CMD, "ipconfig|" or die "ipconfig: $!\n"; print SOCK_WRITE while ; exit(0);