FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-24 21:29:21 +00:00
Code Issues Releases Wiki Activity

betateilchen: debug code

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@18301 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
betateilchen 2019-01-17 15:32:40 +00:00
parent 4136991831
commit 4380191603
1 changed files with 7 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
fhem/contrib/betateilchen/debug/configDB.pm
View File

@ -218,18 +218,13 @@ foreach my $line (@c) {
} }
use Data::Dumper; #while (<CONFIG>){
print Dumper @config; # my $line = $_;
# $line =~ s/^\s+|\s+$//g; # remove whitespaces etc.
return 0; # $line =~ s/;$/;;/; # duplicate ; at end-of-line
# push (@config,$line) if($line !~ m/^#/ && length($line) > 0);
while (<CONFIG>){ #}
my $line = $_; #close CONFIG;
$line =~ s/^\s+|\s+$//g; # remove whitespaces etc.
$line =~ s/;$/;;/; # duplicate ; at end-of-line
push (@config,$line) if($line !~ m/^#/ && length($line) > 0);
}
close CONFIG;
use vars qw(%configDB); use vars qw(%configDB);