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

[Beat]

über eine Variable in der der Funktionsname steht, springe ich Funktionen an.

Diese Vorgehen ist bereits kriminell. Die Antwort lautet: tue es nicht!

Wie kann ich das sauber abfangen wenn der Funktionsname nicht stimmt/existiert. (schreibfehler)

my %funcs = (
   key1 => &func1,
   key2 => &func2,
 );

if( exists $funcs{$userinput} ){ $funcs{$userinput}->(); }
else{ ... # your Errorhandling }

mfg Beat