0

その時点で perl スクリプトを介して以下のコードを実行すると、接続が拒否されたなどのエラーが常に発生するため、この問題を解決するために誰かが提案できるようにしてください。

ftp_check.pl:

#!/usr/bin/perl
use strict;
use warnings;
use Net::FTP;


my $host = '111.118.248.24';

#-- connect to ftp server
my $ftp = Net::FTP->new($host, Debug => 1) or die "Error connecting to $host: $!";

「111.118.248.24 への接続エラー: ftp_check.pl 行 10 で接続が拒否されました」のようなメッセージが表示されます。

4

1 に答える 1

0

ping を実行できる場合に備えて、サーバーは正常に動作していると思います。とにかく、次のコマンドを端末で実行する可能性はありますか（sshまたはWindowsユーザーの場合はパテのようなクライアントを使用）：

netstat -tulpena | grep -i LIST <<ENTER>>

これで、リスナー モードで実行されている FTP サーバーがあることがわかります。

2番目のステップは、いくつかのftpクライアントを使用して、FTPサーバーに適切に接続できることを確認することです。間にファイアウォールルールがあるかどうかを確認するだけです。実際には、サーバーで「iptables -L」を実行できますただし、ftp クライアントを使用して ftp サーバーの検証を行う方が簡単です。

別の提案は、net::ftp-module ではなく、より安全なものを使用することです。Perl には、SFTP (Net::FTP) 用の優れた CPAN モジュールがあります。

乾杯。

于 2016-02-15T08:34:13.480 に答える