my $FTP=Net::FTP->new($mvp, Timeout=>20, Debug => 1);