Select Code to Download

sub NEXTKEY {
  my $self    = shift;
  #my $lastkey = shift;  # Do you need this?  If not, don't bother shi
+fting it
...

  return($KEYS[$self->{INDEX}]);
}