Datei kopieren - #78585 (Allgemeines zu Perl)

Dubu

2004-01-12 00:34

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

user image

[quote=esskar,11.01.2004, 17:44]

Code: (dl )

my $hexcode = "52 49 46 46 f8 e9 08 00 41 ... ";

for(my $i = 0; $i < length($hexcode); $i += 3)
{
    print OUT chr(hex(substr($hexcode, $i, 2)));
}
...

[/quote]

Code: (dl )

print OUT map { chr hex } split " ", $hexcode;

;)