#!/usr/local/bin/perl

@boy_bands = ("a", "b", "c", "d");

$" = ", ";
printf ("@boy_bands\n");