Substitue and matched expression in a regex perl -
मेरे पास एक HTML फाइल है जिसमें कई अभिव्यक्तियाँ हैं
/ v / global / nagargaurav / कॉल ::ROWS_ARE_MATCHED.log मेरे पास ऐसा कोड है
मेरे $ dir = / v / global / nagargaurav /; $ Html = ~ s / $ dir \\ / (। *?) :: (। *?) \। लॉग / $ 1: $ 2 / जी; $ Html प्रिंट करें; यह आउटपुट देता है
कॉल करें: ROWS_ARE_MATCHED लेकिन मुझे इस तरह आउटपुट की आवश्यकता है < / P>
** कॉल करें: पंक्तियां मिलती हैं ** और ऐसी कई पंक्तियां हैं, लेकिन अभिव्यक्ति समान है। कोई भी इस के साथ मेरी मदद कर सकता है।
सख्त का उपयोग करें; चेतावनियों का उपयोग करें; मेरी $ html = '/v/global/nagargaurav/CALL::ROWS_ARE_MATCHED.log'; मेरा $ dir = '/ v / वैश्विक / नागर्गौरव /'; $ Html = ~ s / $ dir \ / (। *?) :: (। *?) \। लॉग / $ 1: $ 2 / जी; $ Html = ~ s / _ / / g; $ Html प्रिंट करें;
Comments
Post a Comment