/usr/sbin/sendmail:Zou iemand mij kunnen helpen dit programma om te zetten, zodat spam_log verschillende regels zijn?Code:#!/usr/bin/perl # use strict; use Env; my $date = `date`; chomp $date; open (INFO, ">>/var/log/spam_log") || die "Failed to open file ::$!"; my $uid = $>; my @info = getpwuid($uid); if($REMOTE_ADDR) { print INFO "$date - $REMOTE_ADDR ran $SCRIPT_NAME at $SERVER_NAME n"; } else { print INFO "$date - $PWD - @infon"; } my $mailprog = '/usr/sbin/sendmail.hidden'; foreach (@ARGV) { $arg="$arg" . " $_"; } open (MAIL,"|$mailprog $arg") || die "cannot open $mailprog: $!n"; while (<STDIN> ) { print MAIL; } close (INFO); close (MAIL);
Nu plakt hij alles aan elkaar...
Nu de eigenlijk vraag... ik zie dit in mijn spam_log, wat houdt dit in?Dit is vast niet goed, of wel?Code:Qua Out 11 07:35:11 CEST 2006 - /tmp - Qua Out 11 07:35:12 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:14 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp - Qua Out 11 07:35:15 CEST 2006 - /tmp -