or download this
$t->{twig_chunk_number} = 0 if !defined($elt->{cdata});
$elt->{cdata}.= $t->{twig_stored_spaces}.$string
unless( $t->{twig_keep_encoding} && defined($elt->{cdata}) &
+& length($elt->{cdata})>1024 && ++$t->{twig_chunk_number}==1) ; # fix
+es a bug in XML::Parser for long CDATA