Middels een Perl scriptje en een .qmail-bestand probeer ik on the fly het subject van de e-mail te herschrijven. Mijn Perl script is als volgt (gevonden via Google):Plaats ik het volgende in een .qmail-spam bestand:Code:#!/usr/bin/perl # tagmail.pl; 1999-02-18; [EMAIL PROTECTED] use strict; # read mail and split into hdr and body my ($hdr, $body); while (<STDIN>) { last if /^[\r\n]*$/; $hdr .= $_; } $body = join '',<STDIN>; # Fix subject-line $hdr =~ s/^(subject:\s*)(.*)$/$1 $ARGV[0] $2/mi; # print mail print "$hdr\n$body"en ik stuur een e-mail waarvan ik zeker weet dat deze de header 'X-Spam-Status: Yes' zal krijgen, dan ontvang ik de volgende e-mail:Code:# cat .qmail-spam | if grep -i "x-spam-status: yes"; then /share/bin/tagmail.pl "[spam]" | forward xxx@vevida.nl; fi(niks meer, niks minder)Return-Path: <janreilink@vevida.com>
Delivered-To: xxx@vevida.nl
Received: (qmail 8812 invoked by uid 89); 16 Aug 2006 17:59:56 -0000
Delivered-To: vevida.nl-spam@vevida.nl
Voer ik het volgende commando uit op de shell:dan staat er in file.txt:Code:/share/bin/tagmail.pl "[spam]" < test-jan/Maildir/new/$mailbestand >> file.txtAny ideas? Volgens mij roep ik tagmail.pl en de forward op een verkeerde manier aan in het dot-qmail bestand?From: Internet Mail Delivery <postmaster@x>
Subject: [spam] Delivery Notification: Delivery has failed
PS: Ja, ik weet dat SpamAssassin dit kan, maar ik wil het op mijn eigen (een niet-SpamAssassin) manier.

Likes:
![[qmail] "on-the-fly" herschrijven subject](https://www.webhostingtalk.nl/images/WHT_rd/misc/dT.png)

.
