সম্পাদনা
my $string = "প্রোগ্রামিং শিখুন প্রোগ্রামিং টিউটোরিয়াল ক্যারিয়ার গড়তে প্রোগ্রামিং"; my $pattern = qr/^প্রোগ্রামিং/m; while ($string =~ /$pattern/g) { print "$&\n"; }
পূর্বরূপ
