Help for this page
#!/usr/bin/perl ... $resp = <$sock2>; print $resp; exit; }
$ ./751902.pl sock1 = IO::Socket::INET=GLOB(0x7dc230) ... nice to meet you bye