in reply to Send file(s) via socket

Use POE! Take a look at the sample TCP server.

In Section Seekers of Perl Wisdom