☰

特定のIPでPerlコマンドを実行しますか？

tag-icon • tag-icon debian scripting perl ipv4
特定のIPでPerlコマンドを実行しますか？

私は3つのユニークなIPv4 IPを持つDebian Jessie 8サーバーを持っています。 Putty経由でWindows 7からサーバーに接続しています。これら 3 つの IP を使用して、3 つの Putty ウィンドウを開くことができます。 Perlを使用してwhois情報を確認し、use Net::Whois::Rawバックティックを使用してシステムのwhoisを確認するPerlスクリプトを実行しようとしています。

$domain_info = `whois google.com 2>&1`;
$domain_info2 = whois(google.com);

スクリプトは自動化されており、さまざまなURLを継続的に確認します。問題は、3つの窓口に電話が頻繁にかかってくることです。

whois limit exceeded - see www.pir.org/whois for details

すべてのPuttyウィンドウがログインに使用するパブリックIPを使用するようにPerlスクリプトをどのように実行しますか？

答え1

~によると http://search.cpan.org/~nalobin/Net-Whois-Raw-2.85/lib/Net/Whois/Raw.pm、次のことができます。

set_ips_for_server('whois.ripn.net', ['127.0.0.1']);

目的の whois サーバーを照会する IP リストを指定できます。インターフェイスが少なく、指定されたIPからwhoisサーバーにアクセスする必要がある場合に便利です。

答え2

その場合、pwhoisこのモジュールの有用性は次のとおりです。https://api.metacpan.org/source/NALOBIN/Net-Whois-Raw-2.85/pwhois-a srcip呼び出すwhoisことも、そうでない場合もありますが、フラグがあることを示しますpwhois。

関連情報