जब मैं इस प्रोटोटाइप पर्ल सबराउटिन में कोडेफ पास करता हूं तो मुझे सिंटैक्स त्रुटि क्यों मिल रही है?

Question

यह कोड है:

sub function($&) { 
    my $param1 = shift; 
    my $code = shift; 
    # do something with $param1 and $code 
} 

अगर मैं इसे इस तरह से कॉल करने का प्रयास करता हूं:

function("whatever") { 
    print "i'm inside the coderef\n"; 
} 

मुझे Not enough arguments for MyPackage::function at x.pl line 5, near ""whatever" { " मिलता है। मैं कोड ब्लॉक के सामने sub जोड़ने के बिना इसे कैसे कॉल कर सकता हूं?

Answer 1

रखो coderef तर्क पहले:

sub function (&$) { 
    my $code = shift; 
    my $param1 = shift; 
    # do something with $param1 and $code 
} 

function { print "i'm inside the coderef\n" } "whatever"; 

perlsub आदमी पेज, जो भाग में पढ़ता देखें:

एक "और" एक गुमनाम सबरूटीन, की आवश्यकता है जो, अगर पहले तर्क के रूप में पारित , को "उप" कीवर्ड या बाद के अल्पविराम की आवश्यकता नहीं है।

Answer 2

यहां, $ & एक पर्ल का विशेष चर है जिसका उपयोग सटीक पैटर्न से मेल खाने के लिए किया जाता है। (आपने इसे अपने संदर्भ में गलत तरीके से उपयोग किया है) $ `दिए गए पैटर्न से पहले स्ट्रिंग से मेल खाने के लिए उपयोग किया जाता है। दिए गए पैटर्न के बाद स्ट्रिंग से मेल खाने के लिए $ 'का उपयोग किया जाता है।