sub foo {
  my @defaults = ( Index => [],
                                 weeble => "floop", );
  my %args = ( @defaults, @_ );

  for( @{ $args{ Index } } ) {
    ## ...
  }
}