Char => sub {
                my $expat = shift;
                my $chars = shift;
                $cbuffer = $cbuffer . $chars;
                undef $chars;
        }