Use Mouse.

bin/auto

@@ -9,8 +9,8 @@ use strict;
 use warnings;
 use POSIX;
 use locale;
+use Mouse;
 use IO::Socket;
-use Data::Dumper;
 use FindBin qw($Bin);
 our $Bin = $Bin;
 unshift(@INC, "$Bin/../src");