Select Code to Download

#fine
/a (.*) a(.)*(?{push @substrings, $^N}) (?!)/
...
#not fine: we get part of the regex body from a variable
/$regex(?{push @substrings, $^N}) (?!)/
 ^^^^^^ this variable interpolation requires that you use re 'eval'