Net::FTP: Net::FTP(2.65)
Net::FTP:   Exporter(5.566)
Net::FTP:   Net::Cmd(2.21)
Net::FTP:   IO::Socket::INET(1.26)
Net::FTP:     IO::Socket(1.27)
Net::FTP:       IO::Handle(1.21)

Net::FTP=GLOB(0x15de3b4)<<< 220 Service ready
Net::FTP=GLOB(0x15de3b4)>>> user mvpadmin
Net::FTP=GLOB(0x15de3b4)<<< 500 Unsupported command
Connected to 128.1.198.22
Net::FTP=GLOB(0x15de3b4)>>> TYPE I
Net::FTP: Unexpected EOF on command channel at ftptest.pl line 17
getsockname() on closed socket GEN0 at D:/Perl/lib/IO/Socket.pm line 192.