my $buf = <$client>;
            chomp $buf;
            print $buf;