Results (consistent with other reports) for ActiveState 5.8.9-827 and Strawberries 5.10.1.0 and 5.12.0.1 under Windows 7:

>perl -wMstrict -le
"my @mystrings = ('string') x 10_000;
 ;;
 my %evaled;
 for my $i (0 .. $#mystrings) {
   eval qq{ qr{\$mystrings[$i]} };
   $evaled{$i} = $@;
   }
 ;;
 my $ok =()= grep !$_, values %evaled;
 printf qq{ok  == %4d \n}, $ok;
 my $bad =()=
   grep $_ &&
        /Global symbol \"\$mystrings\" requires explicit package name/
+,
   values %evaled
   ;
 printf qq{bad == %4d \n}, $bad;
"
ok  ==  392
bad == 9608
[download]