Help for this page

Select Code to Download


  1. or download this
    my $s = "ZBBBCZZ";
my @x;
push @x, $1 while $s =~ /((.)\2*)/g;
  2. or download this
    s = "ZBBBCZZ"
x = []
s.scan(/((.)\2*)/){x.push [$~[0]]}
  3. or download this
    import itertools
s = "ZBBBCCZZ"
x = [''.join(g) for k, g in itertools.groupby(s)]
  4. or download this
    group "ZBBBCCZZ"