Объединение различных правил case в одном регулярном выражении Perl

У меня есть переменная Perl, $word. Я хочу сделать регулярное выражение, подобное этому:

$text =~ /ab($word)cd/;

Я хочу, чтобы регулярное выражение было чувствительно к регистру -для частей abи cd, но не для всего, что находится в $word. Итак, если $word='stack', я бы хотел, чтобы оба они соответствовали:

abstackcd
abStAcKcd

и т. д., но я не хочу соответствовать

Abstackcd

, я думаю, я ищу способ применить /iтолько к $wordно не остальную часть выражения. Можно ли это сделать?