foreach my $id (@{c1_uniq_cog_ids}) {
    # Do stuff
}