Error in the example code

[Anonymous Monk]

Hello all,

I just thought I'd let you know there is an error in this example code.

@simpsons=split(/\s+/ $line); #now splits $line on 1 or more whitespac

+e characters

#@simpsons now containts ("Bart","Lisa","Maggie","Marge","Homer");

You are missing a comma (/\s+/,$line). On a seperate note does anyone know how I would join an array with a comman except for the last value.

ie I have an array of postcodes, that I am going to print out as a string.

$postcodes=join(", ",@Postcode_array);
print "any area.  postcode1, postcode2, postcode3\n";
What I would like to print out is this.
print "any area.  postcode1, postcode2 & postcode3\n";

Any help would be great... Thanks, Greg

Edit: g0n - code tags & formatting

[Anonymous Monk]

first store the length of array by using count variable and then exclude the last element of array... is this a good idea...?

[davorg]

my @arr = (1 .. 10);

print join(', ', @arr[0 .. $#arr - 1]), " & $arr[$#arr]\n";

--
<http://www.dave.org.uk>

"The first rule of Perl club is you don't talk about Perl club."