my $param = @_;

##</code><code>##

my %param = @_;
print $param{uno}, "\n";