print join n times on a line

@GetServiceList = `grep ^[a-z] ./sub/100087.txt`;
chomp @GetServiceList;
print join (", ", @GetServiceList);

spray
sendmail
crond

spray, sendmail, crond

Select Code to Download