This is my below code to transfer file using TCP in Perl. We are transferring \'n\' number of files using thread to other servers and also each file we chunk as 5mb before s
