Select Code to Download

sub import {
    my $self = shift;
...
        $self->{creatim} = 0;
    };
}

sub splice_raw # splice a raw value into a section
{
...
## here comes 805 ##
    splice @{$section}, $position, $length, @_;
}