¹®ÀÚ¿­ :: BlackWhiteList.

¹®ÀÚ¿­ :: BlackWhiteList´Â ºí·¢¸®½ºÆ®¿Í È­ÀÌÆ®¸®½ºÆ®¿¡ ´ëÇÑ ¹®ÀÚ¿­À» ÀÏÄ¡½ÃÅ°´Â Perl ¸ðµâÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

¹®ÀÚ¿­ :: BlackWhiteList. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Marcel Grnauer
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~marcel/Module-Install-Template-0.05/lib/Module/Install/Template.pm

¹®ÀÚ¿­ :: BlackWhiteList. ű×


¹®ÀÚ¿­ :: BlackWhiteList. ¼³¸í

¹®ÀÚ¿­ :: BlackWhiteList´Â ºí·¢¸®½ºÆ®¿Í È­ÀÌÆ®¸®½ºÆ®¿¡ ´ëÇÑ ¹®ÀÚ¿­À» ÀÏÄ¡½ÃÅ°´Â Perl ¸ðµâÀÔ´Ï´Ù. ¹®ÀÚ¿­ :: BlackWhiteList´Â ºí·¢¸®½ºÆ®¿Í È­ÀÌÆ®¸®½ºÆ®¿Í ¹®ÀÚ¿­À» ÀÏÄ¡½ÃÅ°´Â Perl ¸ðµâÀÔ´Ï´Ù. ¹®ÀÚ¿­ :: BlackWhiteList¸¦ »ç¿ëÇÕ´Ï´Ù. ²÷ÀÓ¾ø´Â ºí·¢¸®½ºÆ® => ( 'Æ÷½ºÆ®', 'Æ÷', 'PO', 'PO ¹Ú½º', 'PO', 'POB', 'POBOX', 'PO BOX', 'PO', 'POBOX' , 'PO ¹Ú½º', 'POBOX',); ²÷ÀÓ¾ø´Â È­ÀÌÆ®¸®½ºÆ® => ( 'POST ROAD', 'POST RD', 'POST Street', 'Post St', 'Post Avenue', 'Post AV', 'Post Alley', 'Post Drive'); my @ok = ( 'Post Road 123', 'Post RD 123', 'Post Street 123', 'Post St 123', 'Post Avenue 123',)); my @not_ok = ( 'Æ÷½ºÆ®', 'p.o. »óÀÚ 37', 'p.o. »óÀÚ 37,'µå¶óÀ̺ê 9 ','Æ÷½ºÆ® ½ºÆ®¸®Æ®, p.b. ',); Å×½ºÆ® °èȹ => @OK + @NOT_OK; My $ Matcher = ¹®ÀÚ¿­ :: BlackWhiteList-> New (Blacklist => , Whitelist => ) -> ¾÷µ¥ÀÌÆ®; OK ($ matcher-> À¯È¿ ($ _), " À¯È¿")¿¡ ´ëÇÑ @OK; OK (! $ matcher-> À¯È¿ ($ _), " À߸øµÈ") ¿ä±¸ »çÇ× : ¡¤ Perl ¿ä±¸ »çÇ× : ¡¤ Perl.


¹®ÀÚ¿­ :: BlackWhiteList. °ü·Ã ¼ÒÇÁÆ®¿þ¾î