sub splice_raw # splice a raw value into a section
{
    my $self = shift;
    my $section = shift;
    my $position = shift;
    my $length = shift;

## here comes 805 ##
    splice @{$section}, $position, $length, @_;
}