{
  local $, = ', ';
  print @list;
}