pack / unpack Problem bzw Raetsel (gelöst) (Allgemeines zu Perl) - Perl-Community.de

Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl

2024-12-22 19:38:52
Europe/Berlin
Einloggen (Registrieren)
- Einstellungen
- Statistics
Jemand zu Hause?
0 Benutzer online
1 Gast

[thread]20618[/thread]

submit to reddit

pack / unpack Problem bzw Raetsel [gelöst]

[gelöst]

Tags: perl5 Ähnliche Threads

Leser: 13

Articles: hide open all | hide show old branches

+4 replies
Perlentaucher

2019-05-16 11:15
User since
2014-08-04
26 Artikel
BenutzerIn
Hallo zusammen

ich bin in der Situation, dass ich mal wieder den Wald vor lauter Bäume nicht sehe.

Folgender Code bringt seine erwünschte Wirkung im dann folgenden Programmablauf:
Code: (dl )

my $salt = pack("C*",0x77,0x35,0x36,0xDC,0xC3,0x0E,0x2E,0x84,0x7E,0x0E,0x75,0x29,0xE2,0x34,0x60,0xCF);
Ich habe aber aufgrund eines vorangehenden Codes die o.g. hexwerte in einem String in dem format
Code: (dl )

$SaltHexString = "773536dcc30e2e847e0e7529e23460cf";
vorliegen.

Wie bekomme ich also das format von $salt aus dem $SaltHexString?

Danke!

Gruss
Perlentaucher
- rosti
  
  2019-05-16 11:45
  User since
  2011-03-19
  3492 Artikel
  BenutzerIn
  Ke Prolem:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8
  
  my $x = "773536dcc30e2e847e0e7529e23460cf"; my $r = [ $x =~/\w{2}/g ]; my $salt = pack "C*", map{hex}@$r; print $salt; w56ÜÃ.„~u)â4`Ï
- +2 replies
- haj
  
  2019-05-16 11:52
  User since
  2015-01-07
  558 Artikel
  BenutzerIn
  Bei pack ist das keine Schande, wenn man mal was übersieht :)
  
  Du willst das H template:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6
  
  my $salt1 = pack("C*",0x77,0x35,0x36,0xDC,0xC3,0x0E,0x2E,0x84,0x7E,0x0E,0x75,0x29,0xE2,0x34,0x60,0xCF); my $SaltHexString = "773536dcc30e2e847e0e7529e23460cf"; my $salt2 = pack 'H*', $SaltHexString; print "Gleich gut gesalzen\n" if $salt1 eq $salt2;
  - Perlentaucher
    
    2019-05-16 17:31
    
    User since
    2014-08-04
    26 Artikel
    BenutzerIn
    
    Hallo haj
    
    Danke, das wars!
    Auch für die Einleitung. :-)
    
    Gruss
    Sailor

View all threads created 2019-05-16 11:15.