adgentns.pl script not creating with service names

tnsnames.ora is not creating with service name.

Run  rapidclone is not creating connecting string with service name and creating as with SIDS.

adgentns.pl   script not creating with service names

perl adgentns.pl  appspass=devmoi  contextfile=/u01/oracle/visappl/admin/TEST_hostname.xml is creating as like this

HRTEST = (DESCRIPTION=
                (ADDRESS=(PROTOCOL=tcp)(HOST=testserver)(PORT=1521))
                (CONNECT_DATA=(SID=HRTEST))
            )

with manual entries

HRTEST=
        (DESCRIPTION=
                (ADDRESS=(PROTOCOL=tcp)(HOST=testerver)(PORT=1521))
            (CONNECT_DATA=
                (SERVICE_NAME=HRTEST)
                (INSTANCE_NAME=HRTEST)
            )
        )

and ran perl adcfgclone.pl appsTier eventhough it is creating with sids in connection_data  tnsnames.ora and same issue with jdbc url