Hexcode zu zahlen (Allgemeines zu Perl)

[thread]11917[/thread]

Hexcode zu zahlen

Leser: 1

Gast Gast

2008-05-26 20:19

Hallo,
ich habe folgendes problem:

$code1 = "\x02";
$code2 = "\x15";
ich brauch jetzt die zahlen 2 und 21 wie gehe ich das am besten an?

renee

2008-05-26 20:49

User since
2003-08-04
14371 Artikel
ModeratorIn

Code: (dl )

C:\>perl -e "my $code = 0x15; print hex $code"
21
C:\>perl -e "my $code = 0x02; print hex $code"
2
C:\>

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/

2008-05-26 21:21

User since
2003-08-04
12208 Artikel
Admin1

Code (perl): (dl )

1
2

my $ord1 = ord $code1;
my $ord2 = ord $code2;

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

Dubu

2008-05-27 00:49

User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn

user image

@renee: Wie hast du das denn geschafft? Bei mir kommt da etwas anderes heraus:

Code: (dl )

1
2

$ perl -wle 'my $code = 0x15; print hex $code'
33

Erklärung: In $code wird der Wert 0x15 = dezimal 21 gespeichert. Die Funktion hex() interpretiert ihr Argument (in diesem Fall die "21") als Hexzahl und gibt das Ergebnis als Dezimalzahl aus (hex 21 = dec 33).

(Was mich jetzt wieder an den alten Witz erinnert: "Why do programmers always mix up Halloween and Christmas?" - "Because oct 31 == dec 25!")

2008-05-27 01:32

User since
2003-08-04
12208 Artikel
Admin1

Dubu+2008-05-26 22:49:23--
@renee: Wie hast du das denn geschafft? Bei mir kommt da etwas anderes heraus:

in der tat, interessant, war mir gar nicht aufgefallen. es geht nur mit hex '0x15'.
vielleicht hat renee da beim pasten etwas vergessen.

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

View all threads created 2008-05-26 20:19.