# not very useful
my $last = $#words;

# very useful
for(0..$#words) {  ...  }