add 1; to the end of default Listeners

diff --git a/perl/Listeners.pm b/perl/Listeners.pm
index cc83051a43011c0ba8aaba49774449b4f8da41f9..ad968b60675f0793c98f94930b99fe5b400e9626 100644 (file)
--- a/perl/Listeners.pm
+++ b/perl/Listeners.pm
@@ -16,4 +16,5 @@ use vars qw(@listen);
 #                 ["localhost", 7300],
 #                 ["foo.dxcluster.net", 7300],
                  );
-
+ 
+1;