abfangen "&$perl_function_name(10)" wenn funktion nicht existier

[Struppi]

So:

my $befehl = 'lesen';

$befehl->($para1,$para2,$para3) if ref $befehl eq 'CODE';

  
Quark.  
  
so:  
  
~~~perl
no strict 'refs';  
$befehl->(1,2,3) if defined &{$befehl};  

Struppi.