안녕하세요, HappyCGI 팀의 고재웅 입니다.
>몇일 밤새워 봤지만 갈수록 어려워 집니다.도대체 펄이
>왜 이렇게 까다로운지 하는 생각마저 듭니다.
>눈에 익은 쓰임에 익숙해 지는가 싶으면
>도무지 알송달송 모를 정말 헷갈리는 각종
>구조와 표현식이 새로나는 머리털 보다 빠지는게
>더 많게 만듭니다. 누군가에 도움 없이는
>이 어~~지럽고 어~~려운 난관을 뚫기 힘들것
>같읍니다.여기서 포기 하기엔 매일 아꼇던 잠...너무
>아깝습니다.제발 도와 주세요..
저도 오정우님의 생각과 비슷합니다. 익숙해지는데 시간이 많이 필요할것 같네요.
>질문1)elsif($FORM{
action
} eq "check") { if($FORM{
myname
}) { #이줄에서의
>$form~은 뒤에 아무것도 안붙었는데 뭘 뜻하는건지??
>어쩔땐 비어 있지 않다면으로(!~)해석하고..이럴땐??
>&check_name; }else { $err=check; &error;}
>}
$FORM{
myname
}이란 변수는 입력폼에서 전달된 변수, 즉
에 입력된 값을 의미합니다. 물론 전달된 변수를 주무르는 부분이 있습니다. 다음처럼요.
==========================================================================
if( $ENV{
REQUEST_METHOD
} eq "GET" ) {
$buffer = $ENV{
QUERY_STRING
};
}
else {
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;
$FORM{$name} = $value;
}
==========================================================================
if($FORM{
myname
}) 의 뜻은 $FORM{
myname
}이라는 변수가 있다면 if 이하를 실행하라는 것이겠죠. 만일 사용자가 아무것도 입력하지 않았다면 "", null string 값이 됩니다. ( $FORM{
myname
} = ""; )
>질문2)아래#의 기능은??아니 제가 뭘 모르는건지 확실하지 않으니깐
>=~다음의 해석은?? elsif ($content_type =~
>m#^multipart/form-data#)
"multipart/form-data"은 HTTP에서 폼데이타 중 파일을 업로드 받을 때 쓰는 것입니다. 사용하는 방법은 다음과 같습니다.
20
556
2000-06-23 16:04:31
닉네임
