Hash an Unterfunktion

[hotti]

hi,

malne Nachfrage, weil ich lang nichts in Perl gemacht habe, ich will sowas:

test(a => 25, b => 33);

und habe in der sub:

  
sub test{  
 my %p = map{$_}@_;  
  
 # Vorbelegen  
 $p{a} ||= 'default';  
  
 print "$p{a}\n";  
}  

die sub gibt "25" aus, weil der key "a" mit einem Wert belegt ist. Ist er das nicht, wird "default" ausgegeben. Soweit sogut, -w meckert nicht, aber:

Ist das so ok vom Style her? Gibts da noch eine andere, evnt. elegantere Lösung?

Hotte