$ perl -F, -lanE 'm/module/?say:say qq|.$F[0]($F[0])$F[1]|' < input.txt 
module abc(
.rist_top_tck(rist_top_tck)
.rist_top_tdi(rist_top_tdi)
.rist_top_tdo(rist_top_tdo)