Select Code to Download

sub foo  {
...
    @_ ? ($self->{foo} = shift) : $self->{foo};
}

&blah( foo=>2, bar=>'Fred');