সম্পাদনা
my $string = "<b>হ্যালো</b><i>বিশ্ব</i>"; my $pattern = qr/<.*?>/; while ($string =~ /$pattern/g) { print "$&\n"; }
পূর্বরূপ