--- a/Build.PL	Tue Jan 25 22:49:47 2011 +0100
+++ b/Build.PL	Tue Jan 25 23:00:34 2011 +0100
@@ -4,7 +4,21 @@
 use warnings;
 use Module::Build;
 
-my $build = Module::Build->new(
+my $builder = Module::Build->subclass(
+    class => "My::Module::Build",
+    code => <<'___CODE',
+    use strict;
+    use warnings;
+    use File::Path;
+    sub ACTION_build {
+	my $self = shift;
+	File::Path::make_path("tmp/bind/master", "tmp/bind/zones.d");
+	$self->SUPER::ACTION_build;
+    }
+___CODE
+);
+
+my $build = My::Module::Build->new(
     module_name    => "dnstools",
     dist_author    => "schlittermann.de",
     dist_version   => "0.1.1",