my @foo = qw(foo bar baz); my $js = 'foo = new Array(' . join(', ', map "'\Q$_\E'", @foo) . ');';