Net::FTP>>> Net::FTP(3.11)
Net::FTP>>>   Exporter(5.73)
Net::FTP>>>   Net::Cmd(3.11)
Net::FTP>>>   IO::Socket::SSL(2.066)
Net::FTP>>>     IO::Socket::IP(0.39)
Net::FTP>>>       IO::Socket(1.39)
Net::FTP>>>         IO::Handle(1.39)
Net::FTP=GLOB(0x363bc80)<<< 220 Service ready for new user.
Connected OK
Net::FTP=GLOB(0x363bc80)>>> TYPE I
Net::FTP=GLOB(0x363bc80)<<< 530 Access denied.
Can't switch to binary mode:  at /home/username/bin/perltest line 9.