use gearmand on 4731 and german on 7003

diff --git a/gearman_driver.pl b/gearman_driver.pl
new file mode 100755 (executable)
index 0000000..7d42559
--- /dev/null
+++ b/gearman_driver.pl
@@ -0,0 +1,13 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+use Gearman::Driver;
+use lib 'lib';
+
+my $driver = Gearman::Driver->new(
+       namespaces => [qw(APKPM)],
+#      server     => 'localhost:4730,localhost:4731',
+       server     => 'localhost:4731,localhost:7003',
+       interval   => 3,
+);
+$driver->run;