Perl配列メソッドの概要
-
ディレクトリ
4.1。$#配列は配列の最後の要素のインデックスを表し、配列の長さは-1です
4.2。@Arrayは配列の長さを表し、直接印刷すると配列の内容が出力されます
まず、Perlでの配列の宣言
- Perlは「@」記号を使用して配列を宣言します。@array;
第二に、Perlでの配列の初期化
2.1。初期値を直接割り当てる
$var = 2
@array = (12,"123","abc",$var);
2.2。qwを使用して配列に値を割り当てる
@array = qw(12 123 abc);
2.3。算術シーケンス
@array = (1..10)
3、配列の基本的な方法
3.1。配列要素へのアクセス
@array=(1,2,3,4,5,6,7);
#取数组元素:
$array[0] #表示数组的第一个元素 1,以此类推。
@array[1..3] #表示数组的第二个元素到第四个元素:2,3,4
@array[1,2,4] #表示数组的第二,第三和第五个元素:2,3,5;顺序也可以交换:@array[4,1,2]: 5 2 3;
#修改数组
#通过上述取数组元素的方法,取得元素,然后进行重新赋值。
$array[0]= -1; # $array=(-1,2,3,4,5,6,7)
@array[1..2]=(8,9); # $array=(1,8,9,4,5,6,7)
3.2。foreachを使用してアレイをトラバースする
#!user/bin/env perl -w
@array = qw(1 2 3 4 5 6);
$var = 100;
foreach $var (@array)
{
print "$var\n";
}
print "var is : $var\n";
3.3。配列のように要素を追加する
- push(@ array、$ var)
- unshift(@array、$ var);#配列の先頭に1つ以上の要素を挿入し、新しい配列の要素数を返します
3.4。配列の要素を削除する
- pop(@array)
- shift();#配列から最初の要素を削除し、要素を削除します
- my @temp = grep {$ _ ne "apple"} @fruits;# "apple"と等しくない要素を削除する
3.5。配列要素のソート
- sort:ASCIIコードテーブルの順序で文字をビットごとにソートします
- reverse:配列を逆にします
- 例:
my @scores = ( 10, 0, 4, 5, 2, 9, 8 );
#字符串数组升序:
my @temp = sort { $a cmp $b } @fruits;
#数字数组升序 :
my @temp = sort { $a <=> $b } @scores;
#字符串数组降序:
my @temp = sort { $b cmp $a } @fruits;
#数字数组升序 :
my @temp = sort { $b <=> $a } @scores;
3.6。空の配列
if(@list) {
print "Not empty \n";
}
my $arr_num = scalar @arr1;
if ($arr_num == 0) {
print "empty \n";
}
4番目に、配列の特別なメンバー変数
4.1。$#配列は配列の最後の要素のインデックスを表し、配列の長さは-1です
4.2。@Arrayは配列の長さを表し、直接印刷すると配列の内容が出力されます