Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

How do I print an array with commas separating each element?

by Anonymous Monk
on Aug 30, 2000 at 14:55 UTC ( #30279=categorized question: print w/replies, xml ) Need Help??
Contributed by Anonymous Monk on Aug 30, 2000 at 14:55 UTC
Q&A  > arrays


Answer: How do I print an array with commas separating each element?
contributed by Jouke

There is:

print join( ',', @array );
Answer: How do I print an array with commas separating each element?
contributed by ar0n

$, = ','; print @array;

$, is the output field separator: print will insert whatever string has been assigned to $, between all of its arguments.

Note that if you use this technique, you should make your assignment to $, temporary by doing

local $, = ',';

Answer: How do I print an array with commas separating each element?
contributed by OfficeLinebacker

Observe the difference in effects between $" and $,

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

Answer: How do I print an array with commas separating each element?
contributed by Roy Johnson

$" can also be used for this:

local $" = ','; print "@arr\n";
Answer: How do I print an array with commas separating each element?
contributed by nite_man

And another way:

map { print $_ . ($_ == $array[$#array] ? '' : ', ' ) } @array;
Answer: How do I print an array with commas separating each element?
contributed by Coruscate

For completeness, here's a verbose solution:

my $x; my @a = qw(one two three); print "$a[$_-1], " while $x++ < $#a; print "$a[$#a]";
Answer: How do I print an array with commas separating each element?
contributed by turnstep

Here's another way:

my $x = 0; printf "$array[$x-1]%s", $x <= $#array ? "," : "\n" while $array[$x++];

It puts a newline instead of a comma after the last element.

Please (register and) log in if you wish to add an answer



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.
  • Log In?
    Username:
    Password:

    What's my password?
    Create A New User
    Chatterbox?
    [karlgoethebier]: shmem: yes - i f you manage it to get on the bike. and pray if you must stop...
    [shmem]: in the french alpes, at the end of a gravel road, we had a beer at a hut - and heard an enduro coming up.
    [shmem]: not by the road, but from there below where you wouldn't want to walk.
    [shmem]: the biker stopped the machine at the table and took off his helmet.
    [shmem]: long white hair, long beard the same, then he proceeded to get off the bike
    [shmem]: saying "biking itself isn't that much, but getting up and down - hell!"
    [shmem]: up and down: on and off the bike, of course

    How do I use this? | Other CB clients
    Other Users?
    Others romping around the Monastery: (7)
    As of 2017-06-25 20:10 GMT
    Sections?
    Information?
    Find Nodes?
    Leftovers?
      Voting Booth?
      How many monitors do you use while coding?















      Results (570 votes). Check out past polls.