#!/usr/bin/env perl use 5.36.0; use utf8; say "à°¶à±à°²à±Šà°•à°®à±à°²" =~ /à°¶à±à°²à±‹à°•/ ? "match" : "nomatch";