Select Code to Download

binmode UPLOADFILE;  
while ( <$upload_filehandle> )

while ($bytesread = $io_handle->read($buffer,1024)) {