my @array = (1, 2, 3);
  print $#array, "\n";