स्पष्ट रूप से पर्ल

Question

के भीतर सिस्टम आर्किटेक्चर निर्धारित करना मैं यह निर्धारित करने का एक आसान तरीका ढूंढ रहा हूं कि एक प्रणाली 32- या 64-बिट पर्ल 5 के भीतर से है या नहीं। मैंने perlvar मैन्युअल पृष्ठ को पीछे और आगे पढ़ा है, और मुझे पता नहीं चला है वेरिएबल जिसमें सिस्टम के सीपीयू आर्किटेक्चर (सीपीयू आर्किटेक्चर पर्ल को संकलित किया गया था, पर्याप्त निकट आ जाएगा)। यह सबसे नज़दीक है:

chomp (my $arch = `uname -m`); 

मैं सोच रहा था कि यह निर्धारित करने का एक और शानदार तरीका था; मुझे बैकटिक एक्सप्रेशन पर भरोसा करने से नफरत है, क्योंकि वे दोनों बाधाएं हैं, असुरक्षित हैं, और अक्सर (यह उदाहरण विशेष रूप से) क्रॉस-प्लेटफार्म संगतता को तोड़ता है। ऐसा कोई कारण नहीं है कि पर्ल को पहले से ही यह जानकारी उपलब्ध नहीं होनी चाहिए।

Answer 1

Config मॉड्यूल देखें।

शायद यह जांच कर रहा है कि $Config{'archname64'} सेट पर्याप्त होगा।

Answer 2

शायद https://metacpan.org/pod/Devel::CheckOS जैसे एक सीपीएएन मॉड्यूल आज़माएं।

Answer 3

Sys::Info::OS->bitness विधि आपके ओएस के "गद्दार" को निर्धारित करेगी।

Answer 4

आप POSIX मॉड्यूल का उपयोग कर सकते हैं जो uname फ़ंक्शन को समान उपयोगिता के समान प्रदान करता है।

use POSIX(); 

my ($sysname, $nodename, $release, $version, $machine) = POSIX::uname; 

या, आपके मामले में:

my $arch = (POSIX::uname)[4];