Select Code to Download

    my $parent = $proteinLU{$word};
    my $wIndex = 0;
...

    print "**$parent->{_name_}** " if exists $parent->{_name_};
    splice @words, 0, $wIndex;

    my $parent = $proteinLU{$word};
    my $wIndex = 0;
...
    } else {
        print "$word ";
    }