&mySub(); sub mySub{ my %Defaults = (Name => 'Russ', Job => 'Programmer', Language => 'Perl'); local %_ = (%Defaults, @_); # Warning, this does not compile! ### #(Now use %_ as my argument list) ### print "The name is: $_{Name}\n"; }