मैं पर्ल में स्रोत लाइन नंबर कैसे प्रिंट कर सकता हूं?

Question

क्या पर्ल में वर्तमान स्रोत लाइन संख्या प्राप्त करना संभव है? सी ++ में समतुल्य __LINE__ है।

Answer 1

print "File: ", __FILE__, " Line: ", __LINE__, "\n"; 

या

warn("foo"); 

Answer 2

__LINE__ शाब्दिक perldata man page की Special Literals खंड में प्रलेखित है।

Answer 3

नोट वहाँ

पर्ल -e'warn ("foo") '-e लाइन 1.

पर

foo के साथ एक पकड़ लिया है अगर यह एक नई पंक्ति के साथ समाप्त होता यह नहीं होगा प्रिंट लाइन नंबर

पर्ल -e'warn ("foo \ n") '

foo

यह भी में प्रलेखित है "perldoc -f मर", लेकिन शायद "perldoc -f चेतावनी दी है" मरने के लिए खंड के संदर्भ में याद करने के लिए आसान है ...

Answer 4

इस लाइन तुम कहाँ बाहर प्रिंट, और "ढेर"

while(my @where=caller($frame++)) { print "$frame:" . join(",",@where) . "\n"; } 

Answer 5

"कार्प का उपयोग करें" और विभिन्न दिनचर्या के साथ खेलते हैं और आप भी एक मिल (बुला कार्यक्रमों से लाइनों की सूची (लिपियों/मॉड्यूल/आदि) जगह आप अब कर रहे हैं करने के लिए नेतृत्व कि) ढेर - सुनिश्चित नहीं है कि यह तरीका सीएनडी द्वारा सुझाए गए "कॉलर" विधि से बेहतर या बदतर है। मैंने सी और पर्ल में लाइन और फ़ाइल वैरिएबल (और संभवतः अन्य समान चर) का उपयोग किया है ताकि यह दिखाया जा सके कि कोड में और मुझे डिबगिंग के दौरान अन्य जानकारी मिली है लेकिन डीबग वातावरण के बाहर थोड़ा मूल्य देखा है।