my @array = split m/(.{8})/, $string;
@array = grep length, @array