in reply to Creating comma-delimited lists

My 2 cents: 

@a = ('this', 'that', 'the other', 'the last thing');

$tmpstring=join(',',@a);

$string = "I know about " . $tmpstring . ".";

print $string;

[download]

Mick

Replies are listed 'Best First'.
RE: Re: Creating comma-delimited lists
by BlaisePascal (Monk) on Aug 24, 2000 at 23:26 UTC
    This is the easy way, but it ignores the requirement to print "and" before the last known item. You would print "I know about this,that,the other,the last thing.", not "I know about this, that, the other, and the last thing.".
[reply]
      It FIGURES that I would overlook that. Thank you, BlaisePascal, for spotting it. It's nice comments like yours that will help to keep me on my toes. :-)

      Well, in an attempt to redeem myself, here's an oversimplified (and crude)fix:

      
@a = ('this', 'that', 'the other', 'the last thing');

$lastone=pop(@a);

$tmpstring=join(',',@a);

$string = "I know about $tmpstring, and $lastone.";

print $string;

      [download]

      Mick
[reply]
[d/l]

In Section Seekers of Perl Wisdom