0

ネットワークがあり、すべてのIPアドレスに名前を付けたい。この目的のために、私は各IPをIP範囲とは別の行に出力するperlスクリプトを作成したいと思います。Net:IPを介して方法を見つけましたが、コマンドラインのIP範囲をスクリプトに解析する方法がわかりません(私はperlを初めて使用します)。私のスクリプトは次のようになります。

#!/usr/local/bin/perl
use Net::IP;
my $test=join(' ',@ARGV);
my $ip = new Net::IP ('$test') || die;
do {
    print $ip->ip(), "\n";
} while (++$ip);

exit;

だから私の唯一の問題は、コマンドラインの構文が次のようになっていることです:perl ip.pl 192.168.10.1 --192.168.10.255そして私はNet:IP('ここ')の後にこの引数をスクリプトに解析する方法を理解できません。

すべてのアイデアをありがとう。

4

1 に答える 1

5

変化する

my $ip = new Net::IP ('$test') || die;

my $ip = new Net::IP ($test) || die;

一重引用符はスカラーを評価しません。

また、常に

use strict;
use warnings;
于 2013-03-19T21:47:15.203 に答える