It appears to depend on qr.

my $pat = qr/a/p;
'aaaa'  =~ /$pat/g or die;
print "MATCH=[${^MATCH}]\n";
[download]

Appears to work OK on 5.18.0.