CGI 언어로 발송 테스트 하는중입니다. 전혀 발송이 되지 않는거 같습니다,
:
sub sendmail {
my ($from, $to, $sendmail, $subject, $message, $opt) = @_;

my $charset = &load_charset("$CONF{'lang'}");
my $css = &load_css("$CONF{'html_skin'}");

if($opt eq "mailling") {
open (MAIL, "|$sendmail -oi -t -odq"); # -odq 옵션은 메일링 리스트에서 사용.
}
else {
open (MAIL, "|$sendmail -t");
}
print MAIL "To: $to\n";
print MAIL "From: $from\n";
print MAIL "Subject: $subject\n";
print MAIL "Content-Type: text/html; charset=$charset\n";
print MAIL "$css\n";
print MAIL "$message\n";
close (MAIL);
}