perlunity.de - PERL | JAVASCRIPT | PHP | MySQL | APACHE



#!/COMMUNITY

Members: 5374
davon online: 1
weitere User: 17
Click for quality!




11.02.2012 / 23:57

Community-Member werden   |   Paßwort vergessen   |   OnlineMonitor (1) Wer ist online ... OnlineMonitor starten !
     

 

Home


PERLscripts


PHPscripts


JAVAscripts


Hilfreiches


Links2www


Newscenter


Community


Interna




Community  »  Perl: Allgemeines Forum zur Themenübersicht Themensuche Themenansicht in Thread-Modus


Beitraghex - Message senden
Seitenanfang
hallo,

ich möchte mit einem Perl-Skript ein Gerät ansteuern, dass nur hex verstehen soll (hat man mir gesagt).
Die Socket - Verbindung klappt (in der Simulation) mit Strings einwandfrei, aber wie kann ich jetzt eine hex - Nachricht, die aus folgenden bytes besteht an dieses Gerät seden?
80 80 AA 04 02 01 01 00

wäre super, wenn mir jemand einen guten tip geben könnte

Datum: 16.10.2006-11:38

Beitragre: hex - Message senden
Seitenanfang
Hallo,

Du mußt einfach die vorliegende Hex-Folge in einen String umwandeln:

Du hast:
my $szHexFolge='80 80 AA 04 02 01 01 00';

ersetze :

$szHexFolge =~ s/\G([0-9A-F]{2})\s*/'\x'.$1/ieg;

print $szHexFolge;

-> '\x80\x80\xAA\x04\x02\x01\x01\x00'

jetzt noch die HexFolge in einen String umwandeln:

my $szSendeString;

eval ( "\$szSendeString=\"$szHexFolge\"" );

Datum: 24.10.2006-06:45

-






-
-