my $index = shift || -1;