in reply to Perl IO::Socket Transfer A File Help
Other problems with <$sock> aside, you're reading two "lines" at a time in your client (the first implicitly into $_ which you're discarding; the second "line" gets printed into your file; lather rinse repeat).
You really want to read (or sysread) blocks and write (or syswrite) them out.
|
|---|