$rx = "bla("; # falsche Regexp eval { $foo =~ /$rx/; }; warn $@ if $@; # hier kann man den Fehler abfragen