Hi

Consider yourself re warned

$ perl -le"use re 'eval'; no re 'eval'; my $re=shift; 1=~/$re/;" -- "(
+??{die666})"
Eval-group not allowed at runtime, use re 'eval' in regex m/(??{die666
+})/ at -e line 1.
[download]