Perl プログラムにコマンドライン引数を渡すにはどうすればいいですか? 質問する

Perl プログラムにコマンドライン引数を渡すにはどうすればいいですか? 質問する

Perl スクリプトを作成中です。コマンドラインパラメータを渡すにはどうすればよいですか?

例:

script.pl "string1" "string2"

ベストアンサー1

何をしたいかによって異なります。 2 つの引数を入力ファイルとして使用する場合は、それらを渡して、<>その内容を読み取ることができます。

異なる意味を持つ場合は、GetOpt::Stdと を使用しGetOpt::Longて簡単に処理できます。GetOpt::Stdは1文字のスイッチのみをサポートし、GetOpt::Longより柔軟です。GetOpt::Long:

use Getopt::Long;
my $data   = "file.dat";
my $length = 24;
my $verbose;
$result = GetOptions ("length=i" => \$length,    # numeric
                    "file=s"   => \$data,      # string
                    "verbose"  => \$verbose);  # flag

あるいは、@ARGVはすべてのコマンドライン引数を含む特別な変数です。$ARGV[0]は最初の引数 (つまり、"string1"あなたの場合) であり、$ARGV[1]は 2 番目の引数です。 にアクセスするために特別なモジュールは必要ありません@ARGV

おすすめ記事