String in Sequenzen gleicher Zeichen zerlegen: mit Regex - #60484 (Allgemeines zu Perl)

murphy

2005-11-28 17:13

User since
2004-07-19
1776 Artikel
HausmeisterIn

Mach das doch so, dann brauchst du keinen Hash:

Code: (dl )

1
2

my @x = "xx556xx" =~ m/((.)\2*)/g;
@x = map { $x[2*$_] } (0..@x/2-1);

When C++ is your hammer, every problem looks like your thumb.