some modules: removed some 'perl -c' errors

git-svn-id: https://svn.fhem.de/fhem/trunk@14041 2b470e98-0d58-463d-a4d8-8e2adae1ed80

fhem/FHEM/33_readingsGroup.pm

@@ -23,6 +23,15 @@ package main;
 use strict;
 use warnings;
 
+use vars qw(%modules);
+use vars qw(%defs);
+use vars qw(%attr);
+use vars qw($init_done);
+use vars qw($lastDefChange);
+sub Log;
+sub Log3;
+
+use vars qw(%data);
 use vars qw($FW_ME);
 use vars qw($FW_wname);
 use vars qw($FW_subdir);

fhem/FHEM/33_readingsHistory.pm

@@ -25,6 +25,11 @@ use warnings;
 
 use POSIX qw(strftime);
 
+use vars qw(%defs);
+use vars qw(%attr);
+sub Log;
+sub Log3;
+
 use vars qw($FW_ME);
 use vars qw($FW_wname);
 use vars qw($FW_subdir);

fhem/FHEM/33_readingsProxy.pm

@@ -25,6 +25,13 @@ use warnings;
 
 use SetExtensions;
 
+use vars qw(%defs);
+use vars qw(%attr);
+use vars qw($readingFnAttributes);
+use vars qw($init_done);
+sub Log;
+sub Log3;
+
 sub readingsProxy_Initialize($)
 {
   my ($hash) = @_;

fhem/FHEM/39_alexa.pm

@@ -9,6 +9,13 @@ use warnings;
 use JSON;
 use Data::Dumper;
 
+use vars qw(%modules);
+use vars qw(%defs);
+use vars qw(%attr);
+use vars qw($readingFnAttributes);
+sub Log;
+sub Log3;
+
 sub
 alexa_Initialize($)
 {

fhem/FHEM/39_siri.pm

@@ -6,7 +6,12 @@ package main;
 use strict;
 use warnings;
 
-#use IO::Socket::INET;
+use vars qw(%modules);
+use vars qw(%defs);
+use vars qw(%attr);
+use vars qw($readingFnAttributes);
+sub Log;
+sub Log3;
 
 sub
 siri_Initialize($)