ÇØÇÇCGI ÆÀÀÇ °íÀç¿õ ÀÔ´Ï´Ù.
>¾È³çÇϼ¼¿ä..... cgi¸¦ °øºÎÇغ¸·Á±¸.... ¾ÆÆÄÄ¡¶û ÆÞÀ» ±ò¾Ò½À´Ï´Ù.... ȯ°æÀº
>À©µµ¿ì98À̱¸¿ä.... ±Ùµ¥ ·ÎÄ÷ΠÇÏ·Á±¸ Çϴµ¥.....ÅÚ³ÝÀ̳ª.ftp·Î Á¢¼ÓÀº
>¾ÈµÇ³ª¿ä? 127.0.0.1·Î....^^;
À©µµ¿ìÁî ¾ÆÆÄÄ¡À¥¼¹ö´Â telnet, FTP¸¦ Áö¿øÇÏÁö ¾Ê½À´Ï´Ù. ·ÎÄ÷Π¼¹ö¸¦ ¿î¿µÇϴµ¥ telnetÀ̳ª FTP ¼ºñ½º°¡ ÇÊ¿äÇÑÁö´Â Àǹ®ÀÌ °¡³×¿ä.
>±Û±¸ ÇÏ´Ùº¸´Ï±î Æ۹̼Ǿê±â°¡ ³ª¿À¸é¼
>cgi-binÀ¸·Î accept°¡ ¾ÈµÇ´ø´ë¿ä... ±×·± ¹®Á¦´Â ¾îÄÉ
>ÇØ°áÇؾßÇÏ´ÂÁö....
¾ÆÆÄÄ¡ ¼³Á¤À» ´Ù½Ã È®ÀÎÇغ¸¼¼¿ä. ±×¸®°í, ¾×ƼºêÆÞÀÌ c:usr µð·ºÅ丮¿¡ ¼³Ä¡µÇ¾îÀÖ³ª È®ÀÎÇغ¸½Ã±¸¿ä.
http://cgi.hanchun.co.kr/cgi-bin/happy.cgi?db=install>±×¸®°í ¸¶Áö¸·À¸·Î Çϳª´õ....ÀÖ½À´Ï´Ù. Ã¥¿¡ ÀÖ´Â ¿¹Á¨´ë¿ä....ÀÌ°Å ¾ÈµÇ³×¿ä...
>¹¹°¡ À߸øµÆ´ÂÁö °¥ÄÑÁÖ¸é °¨»çÇÏ°Ú½À´Ï´Ù.... Á» µµ¿ÍÁÖ¼¼¿ä....Àáµµ
>¸øÀÚ±¸ À̰Ŷû ¾¾¸§ÇÏ´À¶ó ÈûÀÌ ÂÓºüÁ³½À´Ï´Ù.....^^;
¾Æ¸¶µµ ¾×ƼºêÆÞÀÌ c:perl ¿¡ ¼³Ä¡µÇ¾î ÀÖ¾î¼ ±×·²°Ì´Ï´Ù. ¸Ç¾ÕÀÇ #!/usr/bin/perl ¸¦ #!/perl/bin/perl ·Î Çغ¸¼¼¿ä.
>#!/usr/bin/perl
># filename : ExCgi01.cgi # argument
>: table, mode, action
>print "Content-type: text/html
"; require "cgi-lib.pl"; $ReadParse(*in); print
>"
TITLE"; $sever = $ENV("SERVER_SOFTWARE"); print "À¥¼ÒÇÁÆ®¿þ¾î
>= $sever
"; $sename = $ENV("SERVER_NAME");
>print "¼¹ö À̸§ = $sename
"; $gateway
>= $ENV("GATEWAY_INTERFACE"); print "GATEWAY ÀÎÅÍÆäÀ̽º =
>$gateway
"; $seport = $ENV("SERVER_PORT"); print "REQUEST_METHOD
>= $seport
"; $method = $ENV("REQUEST_METHOD"); print
>"REQUEST_METHOD = $method
"; $pathinfo = $ENV("PATH_INFO");
>print "PATH_INFO = $pathinfo
"; $pathtrans =
>$ENV("PATH_TRANSLATED"); print "PATH_TRANSLATED = $pathtrans
"; $scriptname
>= $ENV("SCRIPT_NAME"); print "SCRIPT_NAME = $scriptname
";
>$querystring = $ENV("QUERY_STRING"); print "QUERY_STRING =
>$querystring
"; $remotehost = $ENV("REMOTE_HOST"); print "REMOTE_HOST
>= $remotehost
"; $remoteaddr = $ENV("REMOTE_ADDR"); print
>"REMOTE_ADDR = $remoteaddr
"; $authtype = $ENV("AUTH_TYPE");
>print "AUTH_TYPE = $authtype
"; $remoteuser =
>$ENV("REMOTE_USER"); print "REMOTE_USRE = $remoteuser
"; $content
>= $ENV("CONTENT_TYPE"); print "CONTENT_TYPE = $content
";
>$contlen = $ENV("CONTENT_LENGTH"); print "CONTENT_LENGTH =
>$contlen
"; $httpaccept = $ENV("HTTP_ACCEPT"); print "HTTP_ACCEPT
>= $httpaccept
"; $useragent = $ENV("HTTP_USER_AGENT"); print
>"HTTP_USER_AGENT = $useragent
"
$language = $ENV("HTTP_ACCEPT_LANGUAGE");
>print "HTTP_ACCEPT_LANGUAGE = $language
";