配列を初期化する - Perl

配列を初期化するにはいくつかの方法がある。ここでは代表的な方法を示す。

サンプル

サンプル

;#
;#配列を初期化する
;#

use strict;

#--------------------------#
#       まとめて初期化     #
#--------------------------#
my @array = (1..5);

#--------------------------#
#       個別に初期化       #
#--------------------------#
$array[0] = 1;
$array[1] = 2;
$array[2] = 3;
$array[3] = 4;
$array[4] = 5;


#--------------------------#
#          無名配列        #
#--------------------------#
my $array = [1..5];

#-- こんな感じでアクセスする --#
foreach( @$array ){
    print $_, "\n";
}

print $array->[0], "\n";
print $array->[1], "\n";
print $array->[2], "\n";
print $array->[3], "\n";
print $array->[4], "\n";