use utf8;
use feature 'unicode_strings';
my $string1 = "ŠIN";
my $string2 = "šin";
print "$string1 matches $string2 ? ";
print $string1 =~ /$string2/i ? 'matched' : 'no match';