wobei es aber
my $aa = (exists $test{'a'}) ? 'a' : (exists $test{x}) ? 'x' : '';
heißen muss und nicht
my $aa = (exists $test{'a'}) ? $test{a} : (exists $test{x}) ? $test{x} : '';
denn ich will ja nicht den Inhalt von a bzw. x sondern den Namen a bzw. x
Wieder eine Zustazbedingung :-(
my $aa = defined $x->param('a') ? 'a' : $x->param('x') || '';
Struppi.