On Sun, 4 Aug 2013 12:59:29 +0800 (SGT)
*Shaji Kalidasan* <shajiin...@yahoo.com> wrote:

> I am facing some difficulty using join to display the array elements
> 
> Here is the code snippet
> 
> [code]
> use strict;
> use warnings;
> 
> my @fruits = qw/apple mango orange banana guava/;
> 
> #print '[', join '][', @fruits;
> #print ']';
> 
> print '[', join '][', @fruits, ']';
> best,
> [/code]
> 
> [output]
> [apple][mango][orange][banana][guava][]
> 
> [/output]
> 
> 
> How can I make the output to eliminate the last empty square brackets
> [] using a single print statement. I used two print statements as
> shown in the code snippet above (#lines are commented out)
> 
> Any help is greatly appreciated.

Join is greedy and considers the last ']' as part of its list. Try:

    print '[', join( '][', @fruits ), ']';


-- 
Don't stop where the ink does.
        Shawn

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to