elsif(/^ACCESSIONS\s+(\S.*)/) {
        my %seen = ();
        @accessions = grep { $seen{$_}++ == 0 } split /;\s+/, $1;
    }