my @test_table = ();
print "$#test_table\n";
my $test_table[0] = 'nogizaka46';
print "$#test_table\n";
my $test_table[1] = 'keyakizaka46';
print "$#test_table\n";
実行結果
-1
0
1
print "$#test_table\n";
my $test_table[0] = 'nogizaka46';
print "$#test_table\n";
my $test_table[1] = 'keyakizaka46';
print "$#test_table\n";
実行結果
-1
0
1