Re: Concatenation in Perl

2012-07-22 Thread Jenda Krynicky
From: Paul Johnson p...@pjcj.net You need a mixture of the two approaches: map to prepend not in: and join to join them. my $query = join and , map not in:$_, @folders; @folders = ('one', 'two'); my $query = not in: . join( and not in:, @folders); print $query; will be quicker. no need

Re: Concatenation in Perl

2012-07-22 Thread Paul Johnson
On Sun, Jul 22, 2012 at 11:09:10PM +0200, Jenda Krynicky wrote: From: Paul Johnson p...@pjcj.net You need a mixture of the two approaches: map to prepend not in: and join to join them. my $query = join and , map not in:$_, @folders; @folders = ('one', 'two'); my $query = not in:

Re: Concatenation in Perl

2012-07-21 Thread Dr.Ruud
On 2012-07-19 12:37, punit jain wrote: if( @folders ) { map {$query .= not in:$_ and; } @folders; print \n $query \n; } 'if' is not a function, so put a white space after it. But in this case you don't need the 'if' at all. Don't use map in void context. Alternative code:

Concatenation in Perl

2012-07-19 Thread punit jain
Hi , I am doing a concat operation in Perl for a string like below : - if( @folders ) { map {$query .= not in:$_ and; } @folders; print \n $query \n; } @folders contain - Inbox, Sent Output from above is - *not in:Inbox and not in:Sent and* Expected is = *not in:Inbox and not

Re: Concatenation in Perl

2012-07-19 Thread Paul Johnson
On Thu, Jul 19, 2012 at 04:07:49PM +0530, punit jain wrote: Hi , I am doing a concat operation in Perl for a string like below : - if( @folders ) { map {$query .= not in:$_ and; } @folders; print \n $query \n; } @folders contain - Inbox, Sent Output from above is -

Re: Concatenation in Perl

2012-07-19 Thread Shlomi Fish
Hi punit, see below for my response. On Thu, 19 Jul 2012 16:07:49 +0530 punit jain contactpunitj...@gmail.com wrote: Hi , I am doing a concat operation in Perl for a string like below : - if( @folders ) { map {$query .= not in:$_ and; } @folders; print \n $query \n; }