#! /usr/bin/perl -w

use strict;

my @mystrings = ("string") x 200;

m/$mystrings[99]/;      # This compiles fine.
"$mystrings[100]";      # This compiles fine.
m/$mystrings[100]/;     # This does not.