प्रोग्रामिंग perl

14

पर्ल में किसी सरणी से मान को हटाने का सबसे अच्छा तरीका क्या है?

सरणी में बहुत सारे डेटा हैं और मुझे दो तत्वों को हटाने की आवश्यकता है। नीचे कोड स्निपेट का उपयोग किया जा रहा है, my @array = (1,2,3,4,5,5,6,5,4,9); my $element_omitted = 5; @array = grep { $_ != $element_omitted } @array;

81 arrays perl

5

मैं गैर-रूट उपयोगकर्ता के रूप में CPAN का उपयोग कैसे कर सकता हूं?

मैं एक साझा सर्वर पर पर्ल मॉड्यूल स्थापित करना चाहता हूं, जिस पर मेरे पास रूट एक्सेस नहीं है। मैं यह कैसे कर सकता हूँ? उन्हें CPAN का एक पुराना संस्करण भी प्रतीत होता है (यह कमांड चलाते समय इसके बारे में शिकायत करता है), क्या रूट एक्सेस की आवश्यकता …

81 perl cpan

14

पर्ल में, मैं एक हैश कैसे बनाऊंगा जिसकी कुंजी किसी दिए गए ऐरे से आती है?

मान लीजिए कि मेरे पास एक सरणी है, और मुझे पता है कि मैं बहुत कुछ करने जा रहा हूं "क्या सरणी में एक्स होता है?" जाँच करता है। ऐसा करने का कुशल तरीका उस सरणी को हैश में बदलना है, जहाँ कुंजियाँ सरणी के तत्व हैं, और फिर आप …

80 arrays perl hash

8

कमांड लाइन: grep द्वारा मिलान किए गए सभी फ़ाइलनामों में खोजें और बदलें

मैं grep द्वारा मेल की गई सभी फ़ाइलों में एक स्ट्रिंग को खोजने और बदलने की कोशिश कर रहा हूं: grep -n 'foo' * मुझे फॉर्म में आउटपुट देगा: [filename]:[line number]:[text] ग्रेप द्वारा लौटाए गए प्रत्येक फ़ाइल के लिए, मैं बदल कर फ़ाइल को संशोधित करना चाहते हैं fooके साथ …

80 linux perl awk sed grep

7

एक मॉड्यूल में परिभाषित फ़ंक्शन को ओवरराइट करना लेकिन इसके रनटाइम चरण में उपयोग करने से पहले?

चलो कुछ बहुत सरल है, # Foo.pm package Foo { my $baz = bar(); sub bar { 42 }; ## Overwrite this print $baz; ## Before this is executed } क्या ऐसा भी है कि मैं test.plरन कोड से बदल सकता हूं जो स्क्रीन पर कुछ और प्रिंट करने के …

20 perl compilation

2

कुछ उपयोगकर्ता पर्ल में क्लास के नाम क्यों उद्धृत करते हैं?

Type::Tinyमुझे देखते हुए , मैं देख रहा हूं कि कॉल में वर्ग का नाम Type::Tiny->newआधिकारिक डॉक्स में उद्धृत किया गया है, my $NUM = "Type::Tiny"->new( name => "Number", constraint => sub { looks_like_number($_) }, message => sub { "$_ ain't a number" }, ); ऐसा क्यों है? क्या यह मात्र …

12 perl coding-style classname bareword

2

जब इनपुट फ़ाइल नहीं मिली तो perl script (run with -n / -p) को फेल करने के लिए सबसे अच्छा (मुहावरा) कैसे?

$ perl -pe 1 foo && echo ok Can't open foo: No such file or directory. ok मैं वास्तव में पर्ल स्क्रिप्ट को पसंद करूँगा जब फ़ाइल मौजूद नहीं होगी। जब इनपुट फ़ाइल मौजूद नहीं है, तो -p या -n बनाने का "उचित" तरीका क्या है?

11 perl

1

Raku में wc -l का अनुकरण कैसे करें

पर्ल 5 में, आप wc -lऑनलाइनर का उपयोग करके अनुकरण कर सकते हैं : perl -lnE 'END {say $.}' test.txt Raku पर इस कार्यक्षमता को कैसे लागू किया जाए यदि आप इसे लागू करने का प्रयास करते हैं: raku -e 'say "test.txt".IO.open.lines.elems' यह धीमा हो जाता है और बहुत सारी …

9 perl raku

2

क्या पर्ल के ग्लोब की कोई सीमा है?

मैं 5 पात्रों के रिटर्न की उम्मीद कर रहा हूं: while (glob '{a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z}'x5) { print "$_\n"; } लेकिन यह केवल 4 अक्षर देता है: anbc anbd anbe anbf anbg ... हालाँकि, जब मैं सूची में वर्णों की संख्या कम करता हूँ: while (glob '{a,b,c,d,e,f,g,h,i,j,k,l,m}'x5) { print "$_\n"; } यह सही …

9 perl

2

Ubuntu में Raku (पर्ल 6) को पर्ल 5.26 के साथ स्थापित करें

मैं राकू (पर्ल 6) और इसके सिंटैक्स को सीखने के लिए उत्सुक हूं। मेरे पास पहले से ही मेरे उबंटू मशीन में पर्ल 5 स्थापित है। vinod@ubuntu-s-1vcpu-1gb-nyc1-01:~$ perl -v This is perl 5, version 26, subversion 1 (v5.26.1) built for x86_64-linux-gnu-thread-multi (with 67 registered patches, see perl -V for more …

9 perl install raku rakudo-star

perl पर टैग किए गए जवाब