$ftp->login($u, $p) or die "Failed to login: $!\n";