9 lines
68 B
Perl
9 lines
68 B
Perl
|
my @arr;
|
||
|
|
|
||
|
|
push @arr, 1;
|
||
|
|
push @arr, 3;
|
||
|
|
|
||
|
|
$arr[0] = 2;
|
||
|
|
|
||
|
|
print $arr[0];
|