##
KiB Mem: 1048576 total, 380264 used, 668312 free, 0 buffers
KiB Swap: 262144 total, 81204 used, 180940 free. 33856 cached Mem
PID USER PR NI VIRT RES SHR S %CPU %MEM TIME+ COMMAND
5140 apache 20 0 239888 2348 1756 R 17.3 0.2 144:42.67 httpd
14980 apache 20 0 30840 1884 1228 S 15.6 0.2 153:43.94 bounced.cgi
####
#!/usr/bin/perl
use strict;
use warnings;
use CGI;
use CGI::Carp qw(fatalsToBrowser);
my $q = new CGI;
print $q->header;
print $q->start_html('Bounce summary');
my @files = ;
for (@files){
open(IN, $_);
while () {
last if /The mail system/;
}
while () {
if (m#/domain.com$#) {
print '';
last;
}
s/</g;
print;
}
close IN;
}
print $q->end_html;
##
##
Nov 19 10:38:44 systemd: httpd.service stopping timed out. Killing.
Nov 19 10:38:44 systemd: httpd.service: main process exited, code=killed, status=9/KILL
Nov 19 10:38:44 systemd: Unit httpd.service entered failed state.
####
#!/usr/bin/perl
sleep 1 while 1;