[ 永遠的UNIX::UNIX技術資料的寶庫 ]   GB | BIG5
首頁 > 應用技術 > Sendmail > 正文
用sendmail發送HTML格式的郵件
本文出自:作者：boho (2001-06-21 15:00:00)
先將來自HTML頁面的數據解碼，再調用unix系統sendmail命令即可。 
例如下：#!/usr/local/bin/perl 
# 
&readparse; 
print "Content-type: text/htmlnn"; 
# 
#********* BEGIN BODY******************** 





#******** END BODY************************ 
# 
# EACH VALUE IN THE HTML FORM WILL BE CONTAINED IN 
# THE THE @VALUE ARRAY. 
sub readparse { 
read(STDIN,$user_string,$ENV{'CONTENT_LENGTH'}); 
if (length($ENV{'QUERY_STRING'})>0) {$user_string=$ENV{'QUERY_STRING'} 
}; 
$user_string =~ s/+/ /g; 
@name_value_pairs = split(/&/,$user_string); 
foreach $name_value_pair (@name_value_pairs) { 
($keyword,$value) = split(/=/,$name_value_pair); 
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/ge; 
push(@value, "$value"); 
$user_data{$keyword} = $value; 
if ($value=~/