mxmirror: Remove debug code

Remove Data::Dumper and callers which are all commented out.

mxmirror/mxmirror

@@ -2,21 +2,13 @@
 
 use Socket;
 use Sys::Hostname;
-use Data::Dumper;
 use Getopt::Long;
 
 use Date::Calc;
 
 use strict;
 use warnings;
 
-$Data::Dumper::Sortkeys = "macheteinfach";
-
-
-#print Dumper $t1, $t2, $t3, $t4, $dt12, $dt21, $dt23, $dt34;
-
-
-
 my $JBODMAP='/etc/amd/amd.jbod';
 my $MIRRORMAP='/etc/mxmirrors';
 
@@ -61,8 +53,6 @@ sub check_a {
 
 }
 
-#print Dumper $mirrors;
-
 my $result = GetOptions(
                "from:s"  => \$opt{from},
                "to:s"    => \$opt{to},
@@ -310,8 +300,6 @@ sub get_mirror_status {
     return 'UNKNOWN';
 }
 
-#print Dumper \%opt;
-
 sub do_format {
     my $fmt  = shift;
     my $data = shift;