¾ÆÀ̵ð ºñ¹Ð¹øÈ£ | ȸ¿ø°¡ÀÔ | ºñ¹Ð¹øÈ£ºÐ½Ç
   
¡¡»õ·Î¿î¼Ò½Ä
¡¡FAQ
¡¡À¥ÇÁ·Î±×·¥
¡¡À¥DB
¡¡À¥¼­¹ö
¡¡À¥ÇÁ·Î±×·¥¼öÁ¤
¡¡ÇØÇÇÄ®·³
¡¡°ñµåÆÁ
 
Á¦ÀÛÀÇ·Ú
À¥ÇÁ·Î±×·¥ ÆǸŸô
 
ÇöÀçÀ§Ä¡: ¸ÞÀÎ ÇØÇÇÆ÷·³ À¥ÇÁ·Î±×·¥ : °Ô½Ã¹° ÆîÃÄÀбâ
Total related article : 1  
µî·ÏÀÏ:2009-02-06
½Ã°£:20:15:13
Á¶È¸¼ö:1947
from:211.63.168.205
ÀÌ¿À·ù ÇØ°á¹ý ¾Æ½Ã´ÂºÐ..? (CGI) ±Û¾´ÀÌ : parkhyunt

#

ÀÚ²Ù ¿ä·± ¿¡·¯°¡ ¾ÆÆÄÄ¡ ·Î±×¿¡ ³²´Âµ¥..

Prototype mismatch: sub main::decode ($$;$) vs none

decode´Â sub decode¶ó°í ÀÖ½À´Ï´Ù.

($$;$) vs none À̺κÐÀÌ ¹«½¼¼Ò¸°Áö ¸ð¸£°Ú¾î¿ä ¤Ð¤Ð

#

 

 

 

 

Prototype mismatch: sub main::decode ($$;$) vs none at ./sub.cgi ¸®ÆÛ·¯:ºñ¹Ð

subÀÇ ¹®Àںκп¡¼­ ¿À·ù°¡ ³ª°íÀִµ¥.
¼­¹ö ÀÌÀüÇϱâ Àü¿¡´Â ¾È±×·¨°Åµç¿ä;;
¿ÖÀÌ·¯Áö???

sub decode{
 if ($ENV{'REQUEST_METHOD'} eq "POST") {
  read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
 }else{$buffer = $ENV{'QUERY_STRING'}; }
 @buffer = split(/&/, $buffer);

 foreach (@buffer) {
 
  ($na, $val) = split(/=/, $_);

  $val =~ tr/+/\ /;$val =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
  $val =~ s/</&lt;/g;$val =~ s/>/&gt;/g;$val =~ s/\n//g;
  $val =~ s/=/=/g;$val =~ s/&/&/g;

  if ($na eq "message") {
   $val =~ s/\r\n/<br>/g;
   $val =~ s/\r/<br>/g;
   $val =~ s/\n/<br>/g;
  } else {
   $val =~ s/\r//g;
   $val =~ s/\n//g;
  }
  $in{$na} = $val;
 }
}


  

 
¨Ô
Á¦¸ñ
ÀÛ¼ºÀÎ
Á¶È¸
µî·ÏÀÏ
ÀÌ¿À·ù ÇØ°á¹ý ¾Æ½Ã´ÂºÐ..? (CGI)
parkhyunt
1947
2009-02-06 20:15:13
 

  HOME | ȸ»ç¼Ò°³ | Á¦ÀÛÀÇ·Ú | °³ÀÎÁ¤º¸Ãë±Þ¹æħ | CGIMALL | ÀÚ·á½Ç | »çÀÌÆ®µî·Ï | ·©Å·100 | Æ÷·³ | Ãʺ¸°¡À̵å | Áú¹®°ú´äº¯ | ¹è³Ê±¤°í
Copyright¨Ï1997~2008 HappyCGI All rights reserved
Powered By HappyCGI