Tôi đang cố gỡ lỗi bộ lọc mimedefang mà tôi đã viết và dường như tôi không thể lấy md_syslog để thực sự ghi nhật ký bất kỳ thứ gì. Đây là với mimedefang 2.85 trên Amazon Linux 2. Bằng cách nào đó, việc ghi nhật ký có vẻ đang hoạt động vì tôi thấy nội dung như thế này
Ngày 9 tháng 1 18:00:41 ip-10-0-200-150 mimedefang.pl[26660]: C51DA80055: MDLOG,C51DA80055,mail_in,,,<frommail>,<tomail>,Test
Ngày 9 tháng 1 18:00:41 ip-10-0-200-150 mimedefang.pl[26660]: C51DA80055: filter: append_text_boilerplate=1
Ngày 9 tháng 1 18:00:41 ip-10-0-200-150 mimedefang[6514]: C51DA80055: Thời gian lọc là 7ms
Ngoài ra, bộ lọc của tôi cũng đang hoạt động, bởi vì nó thực sự đang thực hiện công cụ append_[html|text], nhưng một số thứ khác không hoạt động và việc ghi nhật ký của tôi để tìm ra điều đó không hoạt động. Đây là phiên bản lọc/đơn giản hóa của bộ lọc của tôi:
bộ lọc phụ_end {
...
if ($addrs =~ m/$sender/) {
...
if (open(my $fh, '<:encoding(UTF-8)', $text_file)) {
trong khi (của tôi $row = <$fh>) {
$txt_disclaimer .= $row;
}
append_text_boilerplate($entity, $txt_disclaimer, 0); # những công việc này
} khác {
cảnh báo "Không thể mở tệp '$text_file' $!";
}
if (open(my $fh, '<:encoding(UTF-8)', $html_file)) {
trong khi (của tôi $row = <$fh>) {
$html_disclaimer .= $row;
}
...
md_syslog('thông tin', "Bản soạn sẵn được thêm vào"); # điều này không hiển thị
nếu (mở(của tôi $lfh, '>>', $log_file)) {
$log_line = $dest của tôi. ',' . $băm . ',' . giờ địa phương() . "\N";
in $lfh $log_line;
cảnh báo "Tôi nghĩ rằng tôi đã đăng nhập một cái gì đó";
md_syslog('info', "Địa chỉ email đã ghi"); # điều này không hiển thị
đóng($lfh);
} khác {
cảnh báo "Không thể mở tệp nhật ký '$log_file' $!";
md_syslog('cảnh báo', "Không thể mở tệp nhật ký"); # điều này không hiển thị
}
append_html_boilerplate($entity, $html_disclaimer, 0); # những công việc này
} khác {
cảnh báo "Không thể mở tệp '$html_file' $!";
}
}
...
}
Tôi mong đợi một số lệnh gọi md_syslog đó sẽ ghi nhật ký ... gì đó, nhưng tôi không thấy gì trong bất kỳ tệp nhật ký nào. Bất kỳ ý tưởng?
