Wetterabhängige Rolladensteuerung

[nektar]

Das steht im log wen linknx abstürzt

1304707631 INFO FilePersistentStorage : Writing ' ' for object 'google_currtempc'
terminate called after throwing an instance of 'ticpp::Exception'

[Bodo]

Versuch mal die Ausgabe anders:

   my @args='';
    @args = ("/usr/bin/groupwrite", "ip:127.0.0.1", "9/0/0", @currhumidity);
    system(@args) == 0 or die "system @args failed: $?";

[nektar]

so siehts bei mir aus

my @currtempc="";
    @currtempc= split(//,$currtempc);
    foreach my $c(@currtempc){
      $c = "0x".sprintf "%x",ord($c);
    }

[Bodo]

Nee oder? Wieso dass denn? Hmmm

[nektar]

Jetzt stürzt linknx immer ab wen ich die google_weather.pl ausführe

[Bodo]

Nee, soo, für jede Variable.

my @currhumidity="";
    @currhumidity= split(//,$currhumidity);    # Die Variable $currhumidity wird in einzelne Zeichen (Buchstaben) gesplittet
    foreach my $c(@currhumidity){              # und die Zeichen in ein Array gesteckt. 
      $c = "0x".sprintf "%x",ord($c);          # Jedes Element ($c) des Array's (jeder Buchstabe) wird verhext.
    }

Und dann bei der Ausgabe noch das $ durch das @ wechseln, weil wir das Array aus verhexten Buchstaben ausgeben wollen.

[nektar]

Ist ja nicht schlimm.

Nur ich weiß nicht genau wie es aussehen soll:-(

dies hier funzt z.B. nicht

    my @hexvariable="";
    @hexvariable= split(//,$variable);
    foreach my $currtempc(@hexvariable){
      $currtempc = "0x".sprintf "%x",ord($c);
    }

[Bodo]

Ja leider

Wär schöner ich hätte es gleich mundgerecht aufgearbeitet.

Sorry

[nektar]

Ach gottchen.
So Kompliziert habe ich mir das jetz aber nicht vorgestellt

[Bodo]

Achtung:

$var ist eine Variable.
@var ist ein Array. Eine Sammlung von Variablen.

groupswrite ... @blabla und das für jeden der 8 Werte.

[Bodo]

Hoi

Ja kann sein.
Mist, es muss jeder Buchstabe in ein HEX umgewandelt werden.
Da bin ich zu kurz gesprungen.
Sowas wie das hier:

    my [COLOR=Red]@[/COLOR]hexvariable="";
    [COLOR=Red]@[/COLOR]hexvariable= split(//,$variable);
    foreach my $c([COLOR=Red]@[/COLOR]hexvariable){
      $c = "0x".sprintf "%x",ord($c);
    }

In ein Unterprogrämmchen könnte man das packen, aber in perl bin ich nicht ganz so firm.

[nektar]

Im Busmonitur sehe ich auch immer nur einen Byte

[nektar]

Da steht nur ne 2. Sollte aber 21 stehten.
Und anstatt Klar steht dort auch nur ein "K"

[Bodo]

Ja auf dem Busmonitor kann das sein, dass es eine Zahl darstellt.
Im knxweb, wie sieht's da aus?

[Bodo]

Hmmm, diese Datentypen grrr