यह बहुत कुछ इस बात पर निर्भर करता है कि $r_val . के अंदर आपका डेटा कैसे फ़ॉर्मेट किया जाता है , लेकिन शुरू करने के लिए एक अच्छी जगह कोशिश करना होगा:
$r_val = preg_replace('/(?<!\.)\b0\b(?!\.)/', '-', $r_val);
जहां \b 0-लंबाई वाला वर्ण 'शब्द' के प्रारंभ या अंत का प्रतिनिधित्व करता है।
यह सुनने में भले ही अजीब लगे, लेकिन Perl regex दस्तावेज़
preg_* . के रेगेक्स भाग को समझाने के लिए वास्तव में अच्छा है फ़ंक्शन, चूंकि पर्ल वह जगह है जहां वास्तव में कार्यक्षमता कार्यान्वित की जाती है।
