Perl小ネタ:配列の要素数を取得する
2019/06/03 22:03
category:Perl
$#配列名
で要素数を取得できます。
my @array = (9,8,7);
print $#array;
[出力]:2
1個目は0からになります。
何もない場合は-1になります。
●配列の最後にデータを格納する
$array[$#array+1] = 値;
と
push(@array,値)
は同一の処理になります。
●配列の値でなにかしらのループをする
foreach my $value ( @array ) {
print $value;
}
と
for ( my $i = 0 ; $i <= $#array ; $i++ ) {
print $array[$i];
}
は同じ回数処理が走ります。
●配列のリファレンスに対して取得する場合
my $array_ref;
$array_ref->[0] = 'a';
$array_ref->[1] = 'b';
$array_ref->[2] = 'c';
print $#{$array_ref};
リファレンスにたいしても、同様の手法で取得できます。