How do you quote and add comma to each element of an array?

my @script = qw(Perl PHP Python Ruby);
print join("," , map {qq("$_")} @script) . "\n";