पर्ल में बिल्टिन फ़ंक्शन (स्प्रिंटफ, जॉइन इत्यादि) के तर्कों के रूप में मैं सरणी का उपयोग कैसे कर सकता हूं?</p> <pre><code>my @a = ('%d %d', 10, 20); </code></pre> <p>मैं एक समारोह के लिए तर्क के रूप में इस सरणी के तत्वों का उपयोग करना चाहते हैं:

Question

मैं निम्नलिखित की तरह एक सरणी है।

अगर मैं तो बस उसे सीधे उपयोग करने का प्रयास है, यह अदिश संदर्भ में व्याख्या हो जाता है:

say sprintf(@a);  #=> 3 

मैं भी इस है, जो निश्चित रूप से काम नहीं किया की कोशिश की:

@_ = @a; say sprintf; #=> Not enough arguments... 

सूचक सिंटैक्स कुछ भाषाएं यहां या तो काम नहीं करती हैं (मैं इस बिंदु पर जंगली अनुमान ले रहा हूं):

say sprintf(*@a);  #=> (error) 

अन्य बिल्टिन फ़ंक्शंस जैसे join के साथ समान समस्याएं होती हैं।

क्या मनमाने ढंग से सरणी (अज्ञात लंबाई) और मनमाने ढंग से कार्य करने का कोई तरीका है और फ़ंक्शन के लिए तर्क के रूप में सरणी के तत्वों का उपयोग करके फ़ंक्शन को कॉल करें? यदि हां, तो कैसे?

Answer 1

sprintf प्रोटोटाइप $@ है, @ नहीं है, इसलिए इसका पहला तर्क स्केलर संदर्भ में मूल्यांकन किया जाता है।

& के साथ एक उप कॉल लगाकर प्रोटोटाइप पर ध्यान नहीं देता है, लेकिन आप builtins का पूरा नाम का उपयोग करना चाहिए उन्हें उप कॉल होने के लिए:

say &CORE::sprintf(@a); # Perl 5.16+ 

या पहले तर्क स्पष्टतः पास:

say sprintf($a[0], @a[1..$#a]);