अपडेट करें:
सरल, वास्तव में, आप connect . द्वारा लौटाए गए हैंडल को असाइन करते हैं $l_dbh . पर कॉल करें लेकिन $dbh . पर एक विधि लागू करें . आपको जरूरी सख्त
का उपयोग करें ।
मूल उत्तर:
डेटाबेस हैंडल $dbh परिभाषित नहीं है जिसका अर्थ है कि कनेक्शन विफल रहा। आपको या तो अपने कॉल्स के रिटर्न वैल्यू की जांच करनी चाहिए, या { RaiseError => 1} . निर्दिष्ट करना चाहिए connect . में कारण जानने के लिए कॉल करें।
इसके अलावा, प्रत्येक उप-आह्वान को & . के साथ उपसर्ग करने का कोई कारण नहीं है :उपयोग करें ConnectFailed( ) के बजाय &ConnectFailed( ) , जब तक कि आप & . के साथ उप-आह्वान लगाने के प्रभाव को नहीं जानते और उस प्रभाव को प्राप्त करने की इच्छा रखते हैं।
perldoc perlsub से :
