my @anon = REGEX;
my $anon = \@anon;
/&$anon/