Select Code to Download

sub foo {
 alias ($_[0] eq 'whatever' ? $_[1] : $_[2]) => my $x;
 ...
}

sub foo {
  my ($aref) = @_;
  alias @$aref => my @ary;
  ... do something with @ary
}