HEX to Binary (Allgemeines zu Perl)

[thread]10338[/thread]

HEX to Binary

witec

2007-09-07 04:26

User since
2007-09-07
1 Artikel
BenutzerIn
[default_avatar]

Hallo erstmal,
folgendes problem mit den ich mich schon eine zeit rumärgern.

ich suche eine einfach Möglichkeit einen Hex-String z.b.
4141414243 umzuwandeln in AAABC leider hatte ich ich mit pack und unpack keinen Erfolg.

Gruß witec.

renee

2007-09-07 10:07

User since
2003-08-04
14371 Artikel
ModeratorIn

Ähm... Wie rechnest Du hier um?? AAABC ist *nicht* binär...

Gibt es eine "Tabelle" nach der umgewandelt werden soll?

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

moritz

2007-09-07 11:46

User since
2007-05-11
923 Artikel
HausmeisterIn

ungestestet:

Code (perl): (dl )

1
2

my $str = "4141414243";
$str =~ s/([a-fA-F0-9]{2})/chr(hex($1))/eg;

Mit pack und unpack geht das sicher auch...

(update: komma durch semikolon ersetzt)

Perl 6 - Perls Zukunft

Taulmarill

2007-09-07 12:53

User since
2004-02-19
1750 Artikel
BenutzerIn

user image

Quote
Mit pack und unpack geht das sicher auch...

ja, geht:

Code: (dl )

$str = pack "H*", $str;

$_=unpack"B*",~pack"H*",$_ and y&1|0& |#&&print"$_\n"for@.=qw BFA2F7C39139F45F78 0A28104594444504400 0A2F107D54447DE7800 0A2110453444450500 73CF1045138445F4800 0 F3EF2044E3D17DE 8A08A0451412411 F3CF207DF41C79E 820A20451412414 83E93C4513D17D2B

View all threads created 2007-09-07 04:26.