সম্পাদনা
my $string = "হ্যালো বিশ্ব"; my $pattern = qr/[^en]/; while ($string =~ /$pattern/g) { print "$&\n"; }
পূর্বরূপ
