cog_class(\@c1_uniq_cog_ids, $name1);
sub cog_class {                                                             my ($c1_uniq_cog_ids, $name) = @_;
  ### you can use @$c1_uniq_cog_ids to get the contents array
}

##</code><code>##

cog_class($name1,@c1_uniq_cog_ids);
sub cog_class {
    my ($name,@c1_uniq_cog_ids)=@_;
}