X-Git-Url: http://ftp.carnet.hr/carnet-debian/scm?p=ossec-hids.git;a=blobdiff_plain;f=contrib%2Fossec-batch-manager.pl;fp=contrib%2Fossec-batch-manager.pl;h=6564298915d13b3069510969dd36ae113f390dd1;hp=dbd5988d77cbe0a304884f3b818756ca99006edc;hb=a62b46c229549212d536867b7e5e24d7576ebe8b;hpb=d623b82886b9b5fbba3fa27c3bfac51f3f8af108

diff --git a/contrib/ossec-batch-manager.pl b/contrib/ossec-batch-manager.pl
index dbd5988..6564298 100755
--- a/contrib/ossec-batch-manager.pl
+++ b/contrib/ossec-batch-manager.pl
@@ -12,7 +12,7 @@
 #                                                       # #
 ##########################################################
 
-#$Id: ossec-batch-manager.pl,v 1.4 2007/11/05 21:05:39 jeff Exp $
+#$Id$
 # TODO:
 # 	- Add check for ossec 1.4 and support longer agent names
 #	- Add in eval so that older version of perl without
@@ -185,7 +185,7 @@ sub extract_key {
     my ($id, $name, $ip, $key) = split;
     if ($id == $extractid) {
       # Newlines are valid base64 characters so use '' instead for \n
-      $decoded = MIME::Base64::encode($key, '');
+      $decoded = MIME::Base64::encode($_, '');
       print "$decoded\n";
       exit 0;
     }