logDebug "opening connection to $arg{firewall}...";
  my $ftp = Net::FTP->new(
      $arg{firewall},
      Debug         => $DEBUG )
    or logError "failed connection: $arg{firewall}: $@"
    and return 0;

  logDebug "logging into $arg{firewall} as $arg{fwuser}...";
  $ftp->login($arg{fwuser},$arg{fwpass})
    or logError "failed login: $arg{fwuser}\@$arg{firewall} " . $ftp->message()
    and return 0;

  logDebug "connecting to $arg{host}...";
  $ftp->quot('OPEN',$arg{host})
    or logError "failed OPEN: $arg{host} " . $ftp->message()
    and return 0;

  logDebug "logging in on $arg{host}...";
  $ftp->login($arg{user},$arg{password})
    or logError "failed login: $arg{user}\@$arg{host} " . $ftp->message()
    and return 0;