nicht angemeldet
Halihallo Philipp
@erg = grep { !/^$/ } split(/(..)/, $string);
*das* ist wirklich originell .. Danke!
.. jedes zweite Elem. ist leer .. und das dann rausgrepen ..
Der ersten Anregung folgend habe ich es so gemacht:
my $hex = unpack('H*', $str);
$hex =~ s/(..)/$split$1/gc;
(wobei $split den "Abstandhalter" enthält)
Wenn ich mal Lust und Muße habe, werd' ich mir mal ansehen, welches von beiden performanter ist.
Herzliche Grüße
K@rl