our $re; $re = qr/
...
/;