Hallo Nobert,
my @bloecke = grep {$_ ne ""} split(/(.{4})/,$string);
Der String könnte aber auch wie folgt ausschauen:
" "
" "
" "
" "
substr wäre zudem ein wenig schneller :-)
Greez,
opi
--
Selfcode: ie:( fl:( br:^ va:) ls:] fo:) rl:( n4:? ss:| de:] ch:? mo:|
Selfcode: ie:( fl:( br:^ va:) ls:] fo:) rl:( n4:? ss:| de:] ch:? mo:|