Leider scheint weder $sender noch $msg sinnvolle Daten zu enthalten, stattdessen kommt in etwa so ein String dabei raus: (15:33:37) simplebot: xyz said: xyz
Interessant, leider nur nicht das was ich will. Weiß jemand Rat?
Edit by Freakazoid: Es kommen komische Zeichen raus. Ich habe die mal durch xyz ersetzt, weil die sonst den RSS-Feed kaputt machen.
hallo
wenn ich das richtig sehe benutzt du Perl.
Mir ist das auch schon passiert.
Du solltest mal statt der 64bit Version von Perl die 32bit Version installieren.
(Pidgin ist leider nur ein 32bit Build, ich denke mal daran liegt das)
Danach hat bei mir alles funktioniert.
(eventuell würde es auch reichen die purple lib neu für 64bit zu erstellen?? weis ich aber nicht)
danke für die Antwort; dass das Perl ist stimmt schon, aber ich denke, dass auf meinem alten Thinkpad X31 eh keine 64-Bit-Programme laufen. Insofern ist alles durchgehend 32 Bit.
unter Perl ist das leider nicht so:
Also zumindest ist bei mir das Pidgin dann immer verreckt als ich es als Referenz behandeln wollte.
Funktioniert einwandfrei:
Code:
use Purple;
use GD;
use Win32::Lglcd;
my $version = "1.0.2";
%PLUGIN_INFO = (
perl_api_version => 2,
name => "PidGin G15",
version => $version,
summary => "Nachrichten dem G15 LCD",
description => "Das Plugin zeigt eine Benachrichtigung wenn jemand online oder offline geht. Später wird auch das Versenden von Nachrichten möglich sein. Hoffe ich.",
author => "Constantin Wenger aka SpeedProg <constantin.wenger\@googlemail.com>",
url => "http://www.speedprog.tk",
load => "plugin_load",
unload => "plugin_unload"
);
my %UML = ( 'Ä' => 'Ae', 'Ö' => 'Oe', 'ô' => 'o', 'Ü' => 'Ue', 'ä' => 'ae', 'ö' => 'oe', 'ü' => 'ue', 'ß' => 'ss', '»' => '>>', '«' => '<<', ''' => '\'', '"' => '"', '&' => '&' );
my @UMLKEYS = join("|", keys(%UML));
my @msglist = ("");
my $msglistlen = -1;
my $x = 0;
my $font = gdTinyFont;
my $im = new GD::Image(160,43,0) or error("can't create image!\n");
my $white = $im->colorAllocate(255,255,255) or error("can't allocate color white!\n");
my $black = $im->colorAllocate(0,0,0) or error("can't allocate color black!\n");
sub error {
my ($msg) = @_;
Purple::Debug::error("PidGin G15", "VERSION:". $version ."\n". $msg ."\n");
}
05.12.2010, 00:21 (Dieser Beitrag wurde zuletzt bearbeitet: 05.12.2010, 00:22 von Freakazoid.)
Vermutlich weil du das falsche Signal benutzt, hm.
received_im_msg kommt nachdem eine Nachricht empfangen und dargestellt wurde, richtig wäre receiving_im_msg .
Zumindest wenn du die Nachricht verändern willst.
Das erklärt aber nur, warum Pidgin abstürzt und nicht, warum in den Variablen Mist steht, wenn du sie nicht als Referenz benutzt.
Sehr interessant. Wenn ich received-chat-msg nehme, steht in $sender tatsächlich der Name drin. Leider in $message aber auch...
Beides sind Skalare, also keine Skalar-Referenzen. Bug?
08.12.2010, 10:44 (Dieser Beitrag wurde zuletzt bearbeitet: 08.12.2010, 10:47 von SpeedProg.)
hm wie gesagt, bei mir was das mal wegen 64bit Perl so. Allerdings war da Name und Message irgendwelche komischen Zeichen.
Was benutzt du den für ein BS? Windows/Linux? 64bit/32bit?
Was für ein Perl?
Dann können wir dir vllt besser helfen.
@Freakazoid :
Ich will die Nachrichten ja gar nicht verändern
Hm ok, das hätte ich anschauen sollen, aber als ich receiving genommen habe damals, konnte ich das glaube ich auch nicht verändern.
Werde das mal checken sobald ich daheim bin.
danke für dein Engagement. Also OS ist Xubuntu 10.04, 32 Bit. Vorausgesetzt Pidgin verwendet das auf dem System installierte Perl und kein eigenes, handelt es sich um
Code:
laptop:~$ perl -V
Summary of my perl5 (revision 5 version 10 subversion 1) configuration:
Platform:
osname=linux, osvers=2.6.24-27-server, archname=i486-linux-gnu-thread-multi
uname='linux vernadsky 2.6.24-27-server #1 smp fri mar 12 01:45:06 utc 2010 i686 gnulinux '
(...)
08.06.2013, 19:03 (Dieser Beitrag wurde zuletzt bearbeitet: 09.06.2013, 03:50 von Stefanos.)
(05.12.2010, 16:57)Dr. Quarkblitz schrieb: Sehr interessant. Wenn ich received-chat-msg nehme, steht in $sender tatsächlich der Name drin. Leider in $message aber auch...
Beides sind Skalare, also keine Skalar-Referenzen. Bug?
Nur angemerkt einfach mal den Inhalt ausgeben lassen, wenn man sich unsicher ist.
Code:
use Data::Dumper;
print Dumper($message);
Pidgin und Perl ist eine wacklige Brücke aber Bugs gibt es weniger mehr Mangel an Features. Auch die Dokumentationen dazu sind mangelhaft.
@SpeedProg
Ich entnehme deinem Posting das Win32::Lglcd bei Dir fehlerfrei läuft?
Habe Probleme mit der Kompilierung (Win7,32-Bit Perl 5.14,Software+Quellcode von Logitech) und weiss nicht ob es an zu neuen Quellen/Hardware liegt oder ich etwas übersehe. Habe Dir auch eine private Nachricht gesendet. Würde mich über eine Antwort freuen bzgl. Vorgehensweise der Kompilierung/Version.
EDIT: Ich danke SpeedProg für Hinweise und Tipps. Wer das Problem auch hat, der sollte einfach eine ältere Edition von der Logitech Software (und SDK) wie lgps304j.exe nutzen. Hab LCDSDK_3.04.137.zip angehängt womit das Modul unter Windows 7 64-Bit mit ActivePerl 5.14 (32-Bit) funktioniert. Funktioniert auch mit G19s noch problemlos.