﹝學習記錄﹞- Perl – 預設變數

預設變數: $_ , @_, @ARGV

 

@ARGV: 存放命令列引數的陣列

$#ARGV: 陣列最後一個索引值

 

執行程式時 後面加上的命令列引數會依序存放在陣列@ARGV

% arrstr.pl   today     is    a     nice    day   !

 

執行結果

string= todayisaniceday!

 

程式碼

my $a;

for (my $i =0; $i <=$#ARGV; $i++){

  $a .=$ARGV[$i];

}

if (!@ARGV){

  print "\n Please enter parameters... \n\n";  # \n 為換行符號

}else{

  print "\n string= ",$a,"\n\n";

}

 

, ,

yunyun 發表在 痞客邦 PIXNET 留言(0) 人氣()