くだすれPerl（超初心者用）

くだすれPerl（超初心者用） at PHP

651:６４９
08/01/04 16:42:27
>>650
レスありがとうございます。
以下のように書き直してみたら、ちゃんと３が表示されましたが、
こういう渡し方をするしかないという意味合いですよね？

sub FuncA(){
my( $n1, $n2 ) = @_;
print "$n1->[0]\n";
print "$n1->[1]\n";
print "$n1->[2]\n";
print "$n2";
}

@a = ( "aaa", "bbb", "ccc");
$i = 3;
&FuncA(\@a,3);

次ページ

続きを表示

1を表示