Platnost regularniho vyrazu

[Jan ' Kozo ' Vajda]

:> Dobry den,
:> mam ve skriptu nasledujici:
:> 
:> $s=~/$regexp/;
:> 
:> Jak zjistim, ze v $regexp je platny vyraz? Pokud je v $regexp napriklad
:> '.?*', tak se skript ukonci s chybovou hlaskou a navratovou hodnotou 2.

eval {
  $s=~/$regexp/;
};

a potom testovat $@



		                                   K O Z O 
                		    ===================================
                                      Look At Your Young Man Fighting
                                         Look At Your Woman Crying
                                       Look At Your Young Man Dying
                                    The Way They've Always Done Before