當perl腳本運行時，從命令行上傳遞給它的參數存儲在內建數組@ARGV中，@ARGV是PERL默認用來接收參數的數組，可以有多個參數，$ARGV[0]是表示接收到的第一個參數，$ARGV[1]表示第二個。
使用方法為：
文件2的內容：
我想先把文件1的內容讀取出來，然后讀取文件二的內容，在讀取文件2的內容的時候，文件2的最后一列需要包含在上文件1內。
open(ONE,"$ARGV[0]") or die $!;
open(TWO,"$ARGV[1]") or die $!;
my %hash;
while (<TWO>) {
chomp;
my @line=split;
my $column4=$line[3];
$hash{$column4}=$_;
}
while (<ONE>) {
chomp;
print $hash{$_} if defined $hash{$_};
}
print"/n";
新聞熱點
疑難解答
