command line arguments - Perl Input Parameters -

संभव डुप्लिकेट:

मेरे पास कोड है जो इनपुट फ़ाइल को पार्स करता है और .stat फ़ाइल और .csv फ़ाइल को आउटपुट करता है। मुझे अपने पर्ल स्क्रिप्ट को इस तरह एक कमांड प्रॉम्प्ट से चलाने के लिए कोड की क्या आवश्यकता है?

  perl myprogram.pl -i "C: \ temp \ inputfile.txt" -o "C: \ Temp \ myoutput.csv "-s" C: \ temp \ myoutput.stat "  
 जहां -i इनपुट फ़ाइल है (आवश्यक) और -o आउटपुट फाइल स्थान के लिए है एक सीएसवी (आवश्यक) और -s .stat फ़ाइल के लिए आउटपुट फ़ाइल है (वैकल्पिक)। मेरे पास पहले से प्रोग्राम के लिए कोड है लेकिन तर्क को लागू करने की आवश्यकता है ताकि वे कमांड लाइन में चला सकें धन्यवाद।   
 
 
  उपयोग करें Getopt :: लंबे qw (GetOptions); उप उपयोग {प्रिंट एसटीडीईआरआर @ अगर @_; प्रिंट एसटीडीईआरआर ...; बाहर निकलने के (1); } उप सहायता {प्रिंट ...; बाहर निकलने के (0); } मेरे $ input_qfn; मेरी $ csv_qfn; मेरी $ output_qfn; GetOptions ("help | h | | | = = & gt; \ & amp; मदद," i = s "= & gt; \ $ input_qfn," o = s "= & gt; \ $ csv_qfn," s = s "= & gt; \ $ Stat_qfn,) या उपयोग (); परिभाषित ($ input_qfn) या उपयोग ("- i विकल्प की आवश्यकता है \ n"); परिभाषित ($ csv_qfn) या उपयोग ("- o विकल्प की आवश्यकता है \ n");