perl redeliver.pl MAILBOX

Where MAILBOX is the mailbox file

my $file = shift || die "need file\n";
my $gto  = shift; # global to.  if present, override other per-email decision
my $msg  = '';
my $to   = '';
my $from = '';

open(I, "<$file") || die "Can't open $file\n";
while (<I>) {
  if (/^From /) {
    if ($msg) {
      if ($to && $from) {
        do_mail($from, $to, $msg);
      } else {
        print STDERR "have a message but no recips\n";
      }
    } else {
      print STDERR "saw From w/ no message\n";
    }
    $msg  = '';
    $from = '';
    $to   = '';
  } elsif (/^Return-path:\s*<(.*)>$/) {
    $from = $1;
  } elsif (/^Envelope-to:\s*(\S+)\s*$/) {
    $to = $1;
  } elsif (/^Delivery-date:\s*/) {
    ; # just ignore
  } else {
    $msg .= $_;
  }
}
close(I);

if ($msg && $to && $from) {
  do_mail($from, $to, $msg);
}

sub do_mail {
  my $f = shift;
  my $t = shift;
  my $m = shift;
  $t = $gto if ($gto);

  print "$f -> $t\n";
  #print "MAIL FROM:<$f>\nRCPT TO:<$t>\nDATA\n$m\n.\n";
  open(P, "|/usr/lib/sendmail -f $f $t") || warn "can't open sendmail: $!\n";
  print P $m, "\n.\n";
  close(P);
}

Working on a web interface for BIND DNS with major inspiration from probinder, here are some preliminary screenshots:

Zone record view

Record edit

Generate and push zone files

This is still in development and very alpha quality, will post some more as I add things.

A client wanted to ensure their scripts were sending out mails without the clients actually receiving the mails and having them redirected somewhere else.

You can do this with an exim filter:

1. Create /etc/cpanel_exim_system_filter_custom with the following content:

# Stop outgoing emails and redirect

if first_delivery
and (“$h_from:” contains “outgoing@domain.com”)
then
seen deliver “test@otherdomain.com”
endif

Then in whm->Exim Configuration Editor->Filters

Change the filter to point to this new file.

This is my variation on a recipe I found online, bill style, these doughnuts are the best ones I ever made, they are light fluffy, sweet and taste just like shop bought doughnuts, easy and quick to make.

Ingredients:

• 6-7 Teaspoons of yeast
• 1/4 cup lukewarm water
• 1 & 1/2 cups of lukewarm milk (full fat)
• 3/4 cup sugar
• 2 eggs
• 1/3 cup shortening (lard) – I couldn’t get hold of lard which is basically pig fat, but you can get it from a polish shop, its called smalec and has pictures of pigs on the wrapper.
• 4 cups plain white flour
• 1 cup cornflour
• 1 teaspoon salt

Doughnuts:

Put water in bowl, add in yeast and 1 tablespoon sugar – leave for 10 minutes until frothy.

In another bowl mix:

Milk, sugar, salt, eggs, shortening and 2 cups of the plain flour

After 5 minutes add in the remaining ingredients and mix thoroughly:

2 cups of plain flour, 1 cup of cornflour and the yeast mixture

Leave for 1 hour – it should grow substantially, I use a glass bowl so I can see the side of the dough as its growing, you want lots of bubbles.

Dust surface with flour and roll out dough, cut into doughnut shapes

Leave cut out doughnuts for another 30 minutes

Fry at 175 Degrees C (use a fat fryer as its much easier than a pan and you get the best results), about a minute each side until golden brown on both sides.

Dip in the glaze and allow to cool.

Glaze:

• 1/3 Cup butter
• 2 cups icing sugar
• 1 & 1/2 teaspoons of vanilla essence
• 4-6 tablesppons of hot water.

Easy – add everything together except the water and mix thouroughly.

Add water 1 teaspoon at a time to get the right consistency (not too runny)

Hi, my name is Bill Chalmers, I’m a web developer working in a hosting company, interests include technology, php, cakephp, jquery, physics, archaeology and other stuff.