BioPerl script to apply Structural Variants to a genbank-file (.gbk)