°í¸£´Ù

OPT´Â ¸í·É Çà ¿É¼Ç°ú ±× °ªÀ» °¡Á®¿Ã ¼ö ÀÖ½À´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

°í¸£´Ù ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Balaji Ramasubramanian
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~balajiram/Opt-0.1.1/Opt.pm

°í¸£´Ù ű×


°í¸£´Ù ¼³¸í

OPT´Â ¸í·É Çà ¿É¼Ç°ú ÇØ´ç °ªÀ» °¡Á®¿Ã ¼ö ÀÖ½À´Ï´Ù. OPT ¸í·É Çà ¿É¼Ç ¹× ÇØ´ç °ªÀ» °¡Á®¿Ã ¼ö ÀÖ½À´Ï´Ù.ÀÌ ¸ðµâÀ» »ç¿ëÇÏ¸é ¸í·É ÁÙ ¿É¼Ç°ú ÇØ´ç °ªÀ» ÀÐÀ» ¼ö ÀÖ½À´Ï´Ù.ÀÌ ¸ðµâÀº ¸í·É ÁÙ ÀÎÅÍÆäÀ̽º¸¦ ó¸® ÇÒ ¼ö ÀÖ½À´Ï´Ù. ¾ö°ÝÇÑ »ç¿ë; MY ($ error, $ opt1, $ opt2, $ opt3, @info) = opt :: getopt ( "- opt1 : b, -opt2 : s = string2, -opt3 : s", "req 1, xor 23" , @argv); ¿É¼ÇÀ» ÁöÁ¤ÇÒ ¶§ ($ ERROR) {Àμâ "¿À·ù°¡ _ µÊ."; "; } else {### {$ opt1 (vief, value) {### opt2ÀÇ ±âº»°ª °ªÀÌ ±âº»°ª ÀÎ °æ¿ì "if ($ info == 1) {### } ELSIF ($ info == 3) {### °ªÀÌ ±âº» ÀμⰡ ¾Æ´Ñ °æ¿ì "±âº»°ªÀÌ ÁöÁ¤µÇÁö ¾ÊÀº °ªÀÌ ÁöÁ¤µÇÁö ¾ÊÀº °æ¿ì"$ OPT2 "; }}} ¿ä±¸ »çÇ× : ¡¤ Perl.


°í¸£´Ù °ü·Ã ¼ÒÇÁÆ®¿þ¾î

DBD :: WTSPRITE.

DBD :: WTSPRITE´Â DBI ¿ë PERL È®ÀåÀÚÀ̸ç Ç÷§ ÆÄÀÏÀ» ÅëÇØ µ¥ÀÌÅͺ£À̽º eDrumulationÀ» Á¦°øÇÕ´Ï´Ù. ...

142

´Ù¿î·Îµå