shutdown($new_sock, 1); #### print while <$newsock>;