Select Code to Download

sub foo {
  my %args = (1 == @_) ? (named_arg => shift) : @_;
  # etc
}

sub foo {
  my $args = shift;
...
  }
  # etc
}