my $ftp = Net::FTP->new(
    $arg{host},
    Firewall => 'firewall_host:port_no',
    FirewallType => 4,
    Passive => 1 );