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

´Ð³×ÀÓ

kkchlove

À̸ÞÀÏ

kkchlove@hanmail.net

Á¦¸ñ

Àú±â¿ä... ÀÌ ¼Ò½º¿¡¼­ À߸ø µÈ°ÍÀÌ ¸ÕÁö ¸ð¸£°Ú¾î¿ä... ´äº¯Á»
³»¿ë
ÀÌ ¼Ò½º¸¦ ¾Æ¹«¸® °íÃĵµ ¿¡·¯ ³ª¿ä....
#!/usr/bin/perl
###########################################################################
# ¹æ¸í·Ï(1)
# ÀÔ·Â µ¥ÀÌÅ͸¦ È®ÀÎÇÑ´Ù.
&read_parse;
# µ¥ÀÌÅÍ°¡ ÀԷµÇÁö ¾ÊÀ¸¸é ¿¡·¯È­¸éÀ» º¸ÀδÙ.
if((!$FORM{'username'}) || (!$FORM{'comment'})) {
print "Content-Type: text/html\n\n';
print <<_START__;
ÀԷ¿¡·¯

ÀԷ¿¡·¯!!


À̸§°ú ³»¿ëÀ» ±â·ÏÇؾ߸¸ µî·ÏÀÌ µË´Ï´Ù.

ÀÔ·ÂÆäÀÌÁö·Î

_START__
exit;
}
else {
# guest.htmÀ» ¿­¾î¼­ ³¡ºÎºÐ¿¡ ÀÔ·Â µ¥ÀÌÅ͸¦ ±â·ÏÇÑ´Ù.
open(FILE, ">>/pungjusa.or.kr/~kkchlove/guest/guest.htm");
print FILE "¼º¸í: $FORM{'username'}
\n";
print FILE "E-MAIL: $FORM{'email'}
\n";
print FILE "³»¿ë:
\n";
print FILE "
: $FORM{'comment'}

\n";
print FILE "
\n";
close(FILE);
# ÀÔ·Â ¿Ï·á È­¸éÀ» º¸¿©ÁØ´Ù.
print "Content-Type: text/html\n\n";
print "°¨»çÇÕ´Ï´Ù.\n";
print "\n";
print "

±Û µî·Ï ¼º°ø!!

\n";
print "¼º¸í: $FORM{'username'}
\n";
print "E-MAIL: $FORM{'email'}
\n";
print "³»¿ë
$FORM{'comment'}
\n";
print "
print "\n";
exit;
}
###################################################
# ¼­ºê·çƾ ÇÁ·Î±×·¥
# ÀÔ·ÂÅ×ÀÌÅÍ Ã³¸®
sub read_parse {
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]) /park("C", hex($1)) /eg;
$FORM{$name} = $value;
}
}
Ãßõ½ºÅ©·¦¼Ò½ºº¸±â ¸ñ·Ï
ÀÌÀü°Ô½Ã±Û ¿µ¹®¸¸ Â÷´ÜÇÏ´Â Perl ¼Ò½º¸¦ Çѱ۵µ Â÷´ÜÇÒ·Á¸é..? 2001-11-20 11:38:19
´ÙÀ½°Ô½Ã±Û asp¸¦ local»ó¿¡¼­ ¾îijÅ×½ºÆ®ÇÏÁö¿ä? 2001-11-21 00:42:16