params :: check.

ÀÏ¹Ý ÀÔ·Â ±¸¹® ºÐ¼® / °Ë»ç ¸ÞÄ¿´ÏÁò
Áö±Ý ´Ù¿î·Îµå

params :: check. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Jos Boumans
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~kane/

params :: check. ű×


params :: check. ¼³¸í

ÀÏ¹Ý ÀÔ·Â ±¸¹® ºÐ¼® / °Ë»ç ¸ÞÄ¿´ÏÁò Params :: Check´Â ÀÏ¹Ý ÀÔ·Â ±¸¹® ºÐ¼® / °Ë»ç ¸ÞÄ¿´ÏÁò ÀÎ Perl ¸ðµâÀÔ´Ï´Ù. ÅÛÇø´À» ÅëÇØ ÀÔ·ÂÀÇ À¯È¿¼ºÀ» °Ë»ç ÇÒ ¼ö ÀÖ½À´Ï´Ù. À¯ÀÏÇÑ ¿ä±¸ »çÇ×Àº Àμö°¡ named.params :: Check¿¡ ´ëÇØ ´ÙÀ½ ÀÛ¾÷À» ¼öÇà ÇÒ ¼ö ÀÖ´Ù´Â °ÍÀÔ´Ï´Ù. * ¸ðµç Å°¸¦ ¼Ò¹®ÀÚ·Î º¯È¯ * ¸ðµç Çʼö Àμö°¡ Á¦°øµÇ¾ú´ÂÁö È®ÀÎÇÕ´Ï´Ù. * ±âº»°ªÀ¸·Î Á¦°øµÇÁö ¾ÊÀº Àμö¸¦ ¼³Á¤ÇÕ´Ï´Ù. * »ç¿ëÀÚ¿¡°Ô Áö¿øµÇÁö ¾Ê°í °æ°íÇÏÁö ¾Ê´Â Àμö¸¦ ²¨³À´Ï´Ù * RequiredSynopsis°¡ Params :: Check Çã¿ë LAST_ERROR]¸¦ »ç¿ëÇÏ´Â °æ¿ì ¹®ÀÚ¿­, regexes, ¸ñ·Ï ¶Ç´Â ¼­ºê ·çƾ À¯Çü ¹«°á¼ºÀ» ±â¹ÝÀ¸·Î »ç¿ëÀÚ°¡ Á¦°ø ÇÑ Àμö¸¦ °ËÁõÇϽʽÿÀ. SUB FILL_PERSONAL_INFO {MY % hash = @_; ³» $ x; MY $ TMPL = {firstname => {Çʼö => 1, Á¤ÀÇ => 1}, lastname => {Çʼö => 1, store => \ $ x}, gender => {Çʼö => 1, Çã¿ë => QR / M / I, QR / F / I],}, °áÈ¥ => {Çã¿ë => }, ¿¬·É => {default => 21, Çã¿ë => qr / ^ \ d + $ /,} , ÀüÈ­ => {Çã¿ë => }, id_list => {default => [], strict_type => 1}, °í¿ëÁÖ => ±âº»°ª => 'nsa', no_override => 1},}; ### CHECK () ¼º°ø½Ã ±¸¹® ºÐ¼® µÈ ARGÀÇ Çؽø¦ µ¹·ÁÁÝ´Ï´Ù. ### MY $ PARSED_ARGS = È®ÀÎ ($ TMPL, \ % ÇؽÃ, $ Verbose) ¶Ç´Â QW ´ÙÀÌ QW!]; ... ¿©±â ´Ù¸¥ ÄÚµå ...} My $ OK = Çã¿ë ($ »ö»ó, ); ³» $ error = params :: Check :: last_error (); ¿ä±¸ »çÇ× : ¡¤ Perl.


params :: check. °ü·Ã ¼ÒÇÁÆ®¿þ¾î

testr_recipe.

ºôµå ¾Æ¿ô ·¹½ÃÇǸ¦ »ç¿ëÇÏ¿© TestRepository¸¦ ½ÇÇàÇÒ ½ºÅ©¸³Æ®¸¦ ¸¸µì´Ï´Ù. ...

128

´Ù¿î·Îµå