½ÃÀÛÆäÀÌÁö·Î Áñ°Üã±âÃß°¡
·Î±×ÀÎ
ȸ¿ø°¡ÀÔ l Ã⼮üũ l ¸¶ÀÌÆäÀÌÁö l CGIMALL
ÀÚ·á½Ç »çÀÌÆ®µî·Ï ·©Å·100 ÇÁ·Î±×·¥¸®ºä °ü¸®ÀÚÃßõÀÚ·á Ãʺ¸°¡À̵å
Ä¿¹Â´ÏƼ
Àüü ÆîÃ帱â
Äü¸Þ´º¸µÅ© jquery , CSS , PHP , Javascript , ¹«·áÆùÆ® , ASP
»ó¼¼°Ë»ö
Ȩ > Ä¿¹Â´ÏƼ > Áú¹®°ú´äº¯ »ó¼¼º¸±â
Ä¿¹Â´ÏƼ ±¸Àα¸Á÷
»çÀÌÆ®µî·Ï
Ŭ¶ó¿ìµåű×
Javascript
PHP
asp
css
mysql
html
jquery
������
image
mobile
API
slide
°Ô½ÃÆÇ
ÇöÀçÁ¢¼ÓÀÚ ¸í »õ·Î°íħ
°Ô½ÃÆÇŸÀÌƲ Áú¹®°ú´äº¯ / »ó¼¼º¸±â
Æ®À§ÅÍ·Î º¸³»±â
Ãßõ¼ö 63 | Á¶È¸¼ö 712 | µî·ÏÀÏ 2001-11-21 00:06:56

´Ð³×ÀÓ

HappyCGI

À̸ÞÀÏ

hero@happycgi.com

Á¦¸ñ

[´äº¯] ¿µ¹®¸¸ Â÷´ÜÇÏ´Â Perl ¼Ò½º¸¦ Çѱ۵µ Â÷´ÜÇÒ·Á¸é..?
³»¿ë
>¾È³çÇϼ¼¿ä..À±¿µ¿õ´Ô.
>¾Æ·¡´Â ºÒ·®´Ü¾î³ª IP, E-mailµîÀ» µî·ÏÂ÷´ÜÇÏ´Â Perl¼Ò½ºÀÇ ÀϺÎÀÔ´Ï´Ù.
>¾Æ·¡¿Í °°Àº ·çÆ®·Î´Â ¿µ¹®¸¸ Â÷´ÜÇÏ°í ÇѱÛÀº Àâ¾Æ³»Áö ¸øÇϴµ¥,
>ÀÌ ·çÆ®¸¦ Çѵ鵵 Àâ¾Æ³¾¼ö ÀÖ°Ô ¼öÁ¤ÇÒ·Á¸é ¾î¶»°Ô ÇØ¾ß ÇÒ±î¿ä?
>²À Á» ´äº¯ ºÎŹµå¸³´Ï´Ù..
>¿ö³«¿¡ Ãʺ¸ÀÎÁö¶ó..
>-------------------------------------
>sub checkbans {
>  my( @files ) = qw(email.ban url.ban word.ban);
>  my( $file, $ban );

>  foreach $file ( @files ) {
>    my $bans = freadall("$DDIR/dbs/$file");
>
>    foreach $ban ( @{ $bans } ) {
>      next if( $ban eq '' );
>      chomp( $ban );
>      derr(1007, "Banned Domain '$ban'") if( $file eq "url.ban" && $FRM{'surl'} =~ m/$ban/gi );
>      derr(1007, "Banned E-Mail '$ban'") if( $file eq "email.ban" && $FRM{'email'} =~ m/$ban/gi);
>      derr(1007, "Banned Word '$ban'") if( $file eq "word.ban" && $FRM{'desc'} =~ m/\b$ban\b/gi);
>      derr(1007, "Banned Word '$ban'") if( $file eq "word.ban" && $FRM{'tit'} =~ m/\b$ban\b/gi);
>    }
>  }
>}
>-----------------------------------
>¼ö°íÇϽðí..´äº¯ ±â´Ù¸³´Ï´Ù..
>

¾È³çÇϼ¼¿ä. ÇØÇÇCGI À¥¸¶½ºÅÍ À±¿µ¿õÀÔ´Ï´Ù.
ÇѱÛÀ» ¹Ù·Î ãÁö ¸»°í ÀÌ·¸°Ô ÇÏ¸é µÉ°Ì´Ï´Ù.
Á¤¼ö³ª ¿µ¹®ÀÌ ¿ÀÁö ¾ÊÀ» °æ¿ì ÇѱÛ(ȤÀº Àâ¹®ÀÚµé) ÀÌ°ÚÁö¿ä.

Á¤¼ö³ª ¿µ¹®À» üŷÇÏ´Â°Ç ¾Æ¹« perl Ã¥À̳ª ÀÚ¼¼È÷ ³ª¿ÍÀÖÀ»°Ì´Ï´Ù. ^^
ÁÁÀº ÇÏ·çµÇ¼¼¿ä.
Ãßõ½ºÅ©·¦¼Ò½ºº¸±â ¸ñ·Ï
ÀÌÀü°Ô½Ã±Û Àú±â¿ä... ÀÌ ¼Ò½º¿¡¼­ À߸ø µÈ°ÍÀÌ ¸ÕÁö ¸ð¸£°Ú¾î¿ä... ´äº¯Á» 2001-11-20 23:41:17
´ÙÀ½°Ô½Ã±Û asp¸¦ local»ó¿¡¼­ ¾îijÅ×½ºÆ®ÇÏÁö¿ä? 2001-11-21 00:42:16