my $regex = qr /(?:$regexstr)/o;