$ftp = Net::FTP->new($host, BlockSize => ... );