Shell向Perl指令碼中傳遞變數的方法

方法一： In shell using export  to output a variable, and in perl using special variable %ENV to get shell's variables.
i.e.:
--- shell box---
$ /bin/ksh
# export x=Foo
# perl -e 'print $ENV{"x"}'
-------------
方法二： 象C一樣，PERL也有儲存命令列參數的數組@ARGV，可以用來分別處理各個命令列參數；與C不同的是，$ARGV[0]是第一個參數，而不是程式名本身。
    $var = $ARGV[0]; # 第一個參數
    $numargs = @ARGV; # 參數的個數
  PERL中，<>操作符實際上是對數組@ARGV的隱含的引用，其工作原理為：
1、當PERL解譯器第一次看到<>時，開啟以$ARGV[0]為檔案名稱的檔案；
2、執行動作shift(@ARGV); 即把數組@ARGV的元素向前移動一個，其元素數量即減少了一個。
3、<>操作符讀取在第一步開啟的檔案中的所有行。
4、讀完後，解譯器回到第一步重複。
  例：
    @ARGV = ("myfile1", "myfile2"); #實際上由命令列參數賦值
    while ($line = <>) {
    print ($line);
    } 
  將把檔案myfile1和myfile2的內容列印出來。