make curl --silent
[vaillant-thermostat] / parse.pl
index 593f1ab..9c6e5bf 100755 (executable)
--- a/parse.pl
+++ b/parse.pl
@@ -16,7 +16,7 @@ while(<>) {
        if ( m/^([0-9\.]+) .+aa fc 39 aa (.+)/ ) {
                my $t = $1;
                #warn "# $1 $2\n";
-               my @l = split(/\s/,$2);
+               my @l = split(/\s+/,$2);
                my @d = (
                        $t,
                        hex( $l[0] . $l[1] ),
@@ -26,6 +26,7 @@ while(<>) {
                        hex( $l[14] ), # * 300,
                        hex( $l[15] ), # * 400,
                        hex( $l[18] ),
+                       $temp
                );
                if ( $influx ) {
                        open($curl, '|-', qq( tee /dev/shm/parse.curl | curl -XPOST $influx --data-binary \@- )) unless $curl;