perl -MNet::FTP -e"print 'ok'"