How can I list all of the files in a directory with Perl? -

इस सवाल का पहले से ही एक उत्तर है: < / P>

• 8 जवाब

क्या पर्ल में कोई फ़ंक्शन है जो निर्देशिका में सभी फाइलों और निर्देशिकाओं को सूचीबद्ध करता है? मुझे याद है कि जावा में File.list () ऐसा करने के लिए है? क्या पर्ल में एक तुलनीय विधि है?

यदि आप दी गई निर्देशिका की सामग्री प्राप्त करना चाहते हैं, और केवल यह (अर्थात् कोई उपनिर्देशिका नहीं), सबसे अच्छा तरीका है opendir / readdir / बंदर का उपयोग करना है:

  मेरे $ dir पर क्लिक करें, "/ कुछ / पथ" या मर "निर्देशिका नहीं खोल सकता: $!"; मेरी @फ़ाइलें = रीडडिर $ dir; बंदर $ dir;  

आप इसका उपयोग भी कर सकते हैं:

  my @files = glob ($ dir। '/ *');  

लेकिन मेरी राय में यह उतना अच्छा नहीं है - ज्यादातर क्योंकि ग्लोब काफी जटिल बात है (परिणाम स्वचालित रूप से फ़िल्टर कर सकते हैं) और डायरेक्टरी के सभी तत्वों को प्राप्त करने के लिए इसका उपयोग करना एक बहुत सरल कार्य के रूप में लगता है।

दूसरी ओर, यदि आपको सभी निर्देशिकाओं और उपनिर्देशिकाओं से सामग्री प्राप्त करने की आवश्यकता है, तो मूल रूप से एक मानक समाधान है:

  फ़ाइल :: खोज का उपयोग करें; मेरी सामग्री; ढूंढें (& amp; चाहते, '/ कुछ / पथ'); Do_something_with (@content); बाहर जाएं; उप चाहता था {push @content, $ file :: find :: name; वापसी; }