http://qs321.pair.com?node_id=582264


⭐ in reply to How do I print an array with commas separating each element?

Observe the difference in effects between $" and $, — 

$\ = "\n";
my @a = qw( One Two Three );
{
  local $, = ',';
  print @a;
  print "@a";
}
{
  local $" = ',';
  print @a;
  print "@a";
}

[download]
Output: 
One,Two,Three
One Two Three
OneTwoThree
One,Two,Three

[download]

In Section Seekers of Perl Wisdom