FHEM/mod-hombot
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Analysepunkte zum Parsen des Fetchingergebnis hinzugefügt

Browse Source
This commit is contained in:
Marko Oldenburg 2015-11-30 16:59:28 +01:00
parent 19e052dc68
commit c20580e674
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
74_HOMEBOT.pm
View File

@ -35,7 +35,7 @@ use Time::HiRes qw(gettimeofday);
use HttpUtils; use HttpUtils;
use TcpServerUtils; use TcpServerUtils;
my $version = "0.0.6"; my $version = "0.0.8";
@ -338,6 +338,8 @@ sub HOMEBOT_Parse_HomebotInfomations($$$) {
my @valuestring = split( '=', $data ); my @valuestring = split( '=', $data );
printf "\n\nfirstSplit\n@valuestring\n\n";
my %buffer; my %buffer;
foreach( @valuestring ) { foreach( @valuestring ) {
my @values = split( '"' , $_ ); my @values = split( '"' , $_ );
@ -349,8 +351,12 @@ sub HOMEBOT_Parse_HomebotInfomations($$$) {
my $t; my $t;
my $v; my $v;
while( ( $t, $v ) = each %buffer ) { while( ( $t, $v ) = each %buffer ) {
$v =~ s/null//g; #$v =~ s/null//g;
printf "\nReading: $t - Value: $v\n";
readingsBulkUpdate( $hash, $t, $v ) if( defined( $v ) ); readingsBulkUpdate( $hash, $t, $v ) if( defined( $v ) );
} }