opi: string in blöcke aufteilen

Beitrag lesen

Hallo Frank,

habe es schon mit
  @bloecke=split /(.{4})/,$string;
probiert, aber das liefert auch leere elemente zurueck.

nun weil Leerzeichen auch Zeichen.

Wie wäre es hiermit:

  
  
# deinem split Beispiel  
  
foreach ( split /(.{4})/, $string ) {  
   next if /^\s+$/;  
   s/^\s+//;  
   s/\s+$//;  
   push @bloecke;  
}  
  
# oder mit substr  
  
my $len = length($string)/4;  
  
for (my $i = 0 ; $len < $i ; $i += 4) {  
   push @bloecke, substr($string,$i,4);  
}  

Die substr Variante habe ich nicht getestet, aber der Ansatz sollte
stimmen.

Greez,
opi

--
Selfcode: ie:( fl:( br:^ va:) ls:] fo:) rl:( n4:? ss:| de:] ch:? mo:|