在Perl中，可以使用@ARGV數組來傳遞命令行參數給子程序。@ARGV數組包含了命令行參數的列表，其中$ARGV[0]是第一個參數，$ARGV[1]是第二個參數，依此類推。
下面是一個示例代碼，說明如何在Perl子程序中接收和使用命令行參數：
#!/usr/bin/perl
sub my_subroutine {
my ($arg1, $arg2) = @_;
print "arg1: $arg1\n";
print "arg2: $arg2\n";
}
my_subroutine($ARGV[0], $ARGV[1]);
假設將上述代碼保存為test.pl，然后在命令行中運行：
perl test.pl hello world
輸出將會是：
arg1: hello
arg2: world
在子程序中，可以通過@_數組來獲取傳遞給子程序的參數。使用my ($arg1, $arg2) = @_;將@_數組中的參數分配給相應的變量。這樣，就可以在子程序中使用這些參數了。
