Perlの配列変数は、@で始まります。添字は0から始まります。
$ cat array.pl
#!/usr/bin/perl
@a = ( ‘Perl’, ‘Java’ );
$a[2] = ‘Ruby’;
@a[3..4] = ( ‘Python’, ‘C’ );
print "\@a:";
print @a;
print "\n\$a[0]:";
print $a[0];
print "\n\@a[0..2]:";
print @a[0..2];
print "\n";
#!/usr/bin/perl
@a = ( ‘Perl’, ‘Java’ );
$a[2] = ‘Ruby’;
@a[3..4] = ( ‘Python’, ‘C’ );
print "\@a:";
print @a;
print "\n\$a[0]:";
print $a[0];
print "\n\@a[0..2]:";
print @a[0..2];
print "\n";
実行結果は次の通り
$ ./array.pl
@a:PerlJavaRubyPythonC
$a[0]:Perl
@a[0..2]:PerlJavaRuby
@a:PerlJavaRubyPythonC
$a[0]:Perl
@a[0..2]:PerlJavaRuby