पैटर्न मिलान के माध्यम से शब्दों को निकालने के लिए कैसे?

Question

#!/usr/bin/perl 

use strict; 
use warnings; 
my $string = "praveen is a good boy"; 
my @try = split(/([a,e,i,o,u]).*\1/,$string); 
print "@try\n"; 

मैं किसी दिए गए स्ट्रिंग में 2 आसन्न स्वर वाले सभी शब्दों को मुद्रित करने का प्रयास कर रहा हूं।
ओ/पी: "प्रवीण" और "अच्छा" होना चाहिए।

मैंने नकारात्मक भाग [^] को विभाजित करने और केवल 2 आसन्न स्वर देने के लिए प्रयास किया।

Answer 1

पर्ल समारोह split नहीं मिलान की सूची पाने के लिए बेहद उपयुक्त है, मैं regex संशोधक g का उपयोग कर की सिफारिश करेंगे, आप या तो पाश जैसे का उपयोग कर सकते हैं, है। इसके बजाय। सभी मैचों के संसाधन के लिए while, या आप एक ही बार में मैचों की सूची प्रदान कर सकते हैं

निम्न उदाहरण एक स्ट्रिंग में सभी शब्दों जो दो आसन्न स्वर होते हैं मैच चाहिए:।

my $string = "praveen is a good boy"; 
while ($string =~ /(\w*[aeiou]{2}\w*)/g) { 
    print "$1\n" 
} 

आउटपुट:

praveen 
good 

तुम भी ऐसा कर सकता है:

my @matches = ($string =~ /\w*[aeiou]{2}\w*/g); 

और परिणाम है कि कैसे आप ओपी में @try प्रसंस्करण कर रहे थे के लिए इसी तरह की प्रक्रिया।

Answer 2

#!/usr/bin/perl 

use strict; 
use warnings; 
my $string = "praveen is a good boy"; 
my @try = split(/\s/,$string); 
for(@try) { 
# if(/[a,e,i,o,u]{2}/) { 
    if(/[aeiou]{2}/) { # edited after Birei's comment 
     print "$_\n"; 
    }; 
}; 

"विभाजन" का पहला तर्क एक डिलीमीटर है। स्प्लिट विभाजन (-8

Answer 3

.. तुम कुछ की तरह कर सकता है

#!/usr/bin/perl 

use strict; 
use warnings; 

my $str 
    = "praveen is a good boy\n" 
    . "aaron is a good boy\n" 
    . "praveen and aaron are good, hoot, ho" 
    ; 

while ($str =~ /(\w*([aeiou])\2(?:\w*))/g) { 
     print $1, "\n"; 
} 

नियमित अभिव्यक्ति:

(    group and capture to \1: 
\w*   word characters (a-z, A-Z, 0-9, _) (0 or more times) 
    (   group and capture to \2: 
    [aeiou]  any character of: 'a', 'e', 'i', 'o', 'u' 
    )   end of \2 
    \2   what was matched by capture \2 
    (?:   group, but do not capture: 
     \w*  word characters (a-z, A-Z, 0-9, _) (0 or more times) 
    )   end of grouping 
)    end of \1 

मूल रूप से कर के रूप में ही है कौन सा /(\w*([aeiou])[aeiou]+(?:\w*))/

आउटपुट:

praveen 
good 
aaron 
good 
praveen 
aaron 
good 
hoot