my $modifier = chr(0x200F);
print "The character $modifier is only in string 1\n";