hvordan attaches i Mail, + send fil en gang i døgnet?
Jeg har fundet dette gode script her:unless (STDIN >> 8 & 0x00ff) {
read(STDIN, $buffer, $ENV{\'CONTENT_LENGTH\'});
}
if (length($buffer) < 3) {
$buffer = $ENV{QUERY_STRING};
}
if (length($buffer) < 1) {
$buffer = join(\'&\',@ARGV);
}
@pairs = split(/&/, $buffer);
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value=~ s/%(..)/pack(\"C\",hex($1))/eg;
push (@file, \"$name=$value\");
}
$indhold = join (\';\',@file);
open (DATA,\">>filnavn.txt\");
print DATA $indhold;
close (DATA);
$mailprog = \' /usr/sbin/sendmail\';
open(MAIL,\"|$mailprog -t\");
print MAIL \"To: $emailadressenninput fra $ENV{\'HTTP_HOST\'}:n$indhold\";
close (MAIL);
exit;
-------
Jeg vil gerne have det udbygget så det attacher filen og sender en mail een gang i døgnet , f.eks. kl 08.00 og derefter tømmer filen, gerne ved at appende den til en backup-fil???
Kan vi det?
