if($jpn =~ m/\Q$ipn\E/) {