날짜: 1996-04-23 | 글쓴이: 도아 | 7166 번 | 프린트 | 메일로보내기

펄 - 제 22강 최종 스크립트


이것으로 모든 것이 끝났다.
################################################################ 
# 헤더를 구성
################################################################ 
print(MAIL "To: recipient\n"); 
if ( ! $cgiVals{'subject'} ) { 
    $cgiVals{'subject'} = "(no subject)"; 
} 
print(MAIL "Subject: $cgiVals{subject}\n"); 
if ( ! $cgiVals{'from'} ) { 
    $cgiVals{'from'} = "nobody"; 
} 
print( MAIL "From: $cgiVals{from}\n"); 
# 헤더를 구성한 후, 빈줄을 추가
print( MAIL "\n"); 
 
################################################################ 
# 몸체를 구성
################################################################ 
foreach $key ( keys(%cgiVals) ) { 
    if ( $key eq "to" || $key eq "subject" || $key eq "from" ) { 
	next; 
    }  
    print( MAIL "$key: $cgiVals{$key}\n"); 
} 
################################################################ 
# 메일 종료
################################################################ 
close(MAIL); 
# the response. 
print("폼을 성공적으로 체출했다. 고맙다."); 
exit(0); 


다음글: 펄 - 제 23강 예제 폼 (5805)1996-04-24
이전글: 펄 - 제 21강 파일처리 (7609)1996-04-22

세상사는 이야기

  • 오타도 즐거운 안드로 >
  • 최고의 OCR 어플, Text >
  • 누구나 할 수 있는 순 >
  • 듀오백 컨텐츠 허브, >
  • 초딩도 할 수 있는 아 >
  • 듀오백 2.0, 최적의 등 >
  • 의자이기를 포기(?)한 >
  • 야후의 꼴통 짓과 플리 >
  • 책을 테이크 아웃? 크 >
  • 전자책(크레마 터치), >


  • RSS 구독 (익명 | 회원 | 강좌 | 포럼)
    (C) 1996 ~ 2014 QAOS.com All rights reserved.