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

´Ð³×ÀÓ

Anonymous

À̸ÞÀÏ

Á¦¸ñ

cgi¼Ò½º Á» ¼ÕºÁÁÖ¼¼¿ä...
³»¿ë
¼Ò½º¸¦ Çϳª ¼Õ º¸°í Àִµ¥ °è¼Ó ¾È µÇ¾î¼­ ÀÌ·¸°Ô ±ÛÀ» ¿Ã¸³´Ï´Ù.. À̱ÛÀ»
º¸½Ã´Â ºÐµéÁß ¾Ë°í °è½ÅºÐµéÀÌ ÀÖ´Ù¸é Àú¿¡°Ô Á» °¡¸£ÃÄÁÖ¼¼¿ä...
¹«¾ùÀÌ ¹®Á¦ÀÎÁö ..¼Ò½º´Â ¹Ø¿¡ ÀÖÀ¸´Ï º¸½Ã°í °¡¸£ÃÄÁÖ¼¼¿ä..
¹ØÀÇ ¼Ò½º´Â ¾ÆÀ̵ð¿Í Æнº¿öµå¸¦ ÀÔ·ÂÇØ È¸¿øÁ¤º¸ ¼öÁ¤ÇÏ´Â °ÍÀε¥ Á¦°¡ »ç¿ëÀÚ
·Î±×ÀÎÀ¸·Î ¼öÁ¤ÁßÀ̰ŵç¿ä..¾ÆÀ̵ð´Â Àß ÀνÄÀ» Çϴµ¥ Æнº¿öµå´Â Á¦´ë·Î
ÀÔ·ÂÀ» Çصµ À߸ø ÀÔ·ÂÇß´Ù´Â ¸Þ¼¼Áö¸¦ ÀÚ²Ù º¸³»´Ï...
ºÎµð Àú¿¡°Ô Å« °¡¸£Ä§À» ÁÖ¼¼¿ä..
±×·³ »õÇØ º¹ ¸¹ÀÌ ¹ÞÀ¸¼¼¿ä..
#!/usr/local/bin/perl
#--------------------------------Start
Prog----------------------------------------
print "Content-type: text/html

";
require "./config.pl";
&getdate;
#---------------------------------------------------------------------------
-------
if ($ENV{
REQUEST_METHOD
} eq
GET
) {
@pairs = split(/&/, $ENV{
QUERY_STRING
});
}
elsif ($ENV{
REQUEST_METHOD
} eq
POST
) {
read(STDIN, $buffer, $ENV{
CONTENT_LENGTH
});
@pairs = split(/&/, $buffer);
}
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$value =~ tr/ / /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
### "&pip;" Filtering
$value =~ s/&pip;/|/g;
$FORM{$name} = $value; }
$FORM{
message
} =~ s/<([^>]&pip;
)*>//g;
$FORM{
name
} =~ s/ /_/g;
$FORM{
name
} =~
s/.&pip;,&pip;:&pip;;&pip;&pip;<&pip;>&pip;"&pip;^&pip;$&pip;@&pip;{&pip;}&pip;]&pip;~&pip;`&pip;[&pip;\%&pip;?&pip;*/_/g;
#---------------------------------------------------------------------------
-------
if ($FORM{
user_login
} ne ""){&user_login;}
if ($FORM{
user_reg_modify
} ne ""){&user_reg_modify;}
&head;
print <


















ȸ¿ø´ÔÀÇ ¾ÆÀ̵ð¿Í ºñ¹Ð¹øÈ£¸¦ ÀÔ·ÂÇϼ¼¿ä.










ȸ¿ø´ÔÀÇ ID
ȸ¿ø´ÔÀÇPASSWORDsize=10> value="È®ÀÎ">


BORDER="0">




END
&tail;
if ($FORM{
mode
} eq "copy"){©}
sub user_login{
&head;
if ($FORM{
user_id
} eq ""){
print <

















ÀÎÁõ¿À·ù !!!

¾ÆÀ̵𸦠ÀÔ·ÂÇØ ÁÖ¼¼¿ä.






BORDER="0">




END
exit;
}elsif ($FORM{
password
} eq ""){
print <

















ÀÎÁõ¿À·ù !!!

Æнº¿öµå¸¦ ÀÔ·ÂÇØ ÁÖ¼¼¿ä.






BORDER="0">




END
exit;
}
unless(open(USER_ID, "$user_dir/$FORM{
user_id
}")){
print <

















ÀÎÁõ¿À·ù !!!

ÀÔ·ÂÇϽŠ¾ÆÀ̵ð´Â Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù.






BORDER="0">




END
exit;
}
else{#ºñÁ¤»óó¸®
&head;
print <

















ÀÎÁõ¿À·ù !!!

Æнº¿öµå°¡ ¸ÂÁö ¾Ê½À´Ï´Ù!






BORDER="0">






END
exit;
&tail;
}#pass if end
print "Refresh
content=
0; url=../../body.htm
>";
exit;
}

Ãßõ½ºÅ©·¦¼Ò½ºº¸±â ¸ñ·Ï
ÀÌÀü°Ô½Ã±Û topsite ¼øÀ§»çÀÌÆ® ¼Ò½º ã½À´Ï´Ù. 2000-01-03 23:13:04
´ÙÀ½°Ô½Ã±Û [±Þ±¸] °æ¸Å¼Ò½º (±×·¹ÇÈ Áö¿ø)¹«·á! 2000-01-04 14:31:44