in reply to international case insensitive searched with Perl

A quick solution could be to use []

my $search =~ /AnyPatt[éÉ]rn/i;