Perl スクリプトに引数を渡して使用の方法

スクリプトにコマンドライン引数を渡してパラメータとして使用できます。スクリプトの中で、@ARGV配列を使ってコマンドライン引数にアクセスできます。

パラメーターの渡し方とPerlスクリプトでそれらを使用する方法を示す簡単な例を次に示します。

#!/usr/bin/perl

# 获取命令行参数
my $arg1 = $ARGV[0];
my $arg2 = $ARGV[1];

# 在脚本中使用参数
print "第一个参数: $arg1\n";
print "第二个参数: $arg2\n";

スクリプトをコマンドラインで実行して、2 つの引数を渡します。

perl script.pl arg1 arg2

スクリプトは以下を出力します：

第一个参数: arg1
第二个参数: arg2

なお、@ARGV配列の添字は0から始まるので、それ以降引数を渡す場合には、順に$ARGV[2]、$ARGV[3]、……のように使用すればよい。

また、scalar 関数を使用して @ARGV 配列の長さを取得することで、渡された引数の数がわかります。

my $num_args = scalar @ARGV;
print "传递的参数个数: $num_args\n";

さらに複雑なコマンドライン引数解析が必要な場合は、Getopt::Long モジュールを使用してコマンドラインオプションと引数を処理できます。