Using grep on undefined array

2013-08-13 Thread Andrew Beverley
Hi, Could someone please explain to me why the following outputs an empty string rather than *? get(); sub get($) { my $fields = shift; my @fields = grep $_ ne 'domain', @$fields; my $select_fields = $fields ? join(',', map { 'users.' . $_ } @fields) : '*'; print $select_fields\n;

Re: Using grep on undefined array

2013-08-13 Thread Paul Makepeace
On Tue, Aug 13, 2013 at 4:09 PM, Andrew Beverley a...@andybev.com wrote: my $select_fields = $fields ? join(',', map { 'users.' . $_ } @fields) : '*'; my $select_fields = @fields ? join(',', map { 'users.' . $_ } @fields) : '*'; ? Maybe a lesson in variable naming there ;-) Paul

Re: Using grep on undefined array

2013-08-13 Thread Adrian Lai
On 14 August 2013 00:09, Andrew Beverley a...@andybev.com wrote: Hi, Could someone please explain to me why the following outputs an empty string rather than *? get(); sub get($) { my $fields = shift; my @fields = grep $_ ne 'domain', @$fields; my $select_fields = $fields ?

Re: Using grep on undefined array

2013-08-13 Thread Avleen Vig
On Aug 13, 2013 7:35 PM, Paul Makepeace pa...@paulm.com wrote: On Tue, Aug 13, 2013 at 4:09 PM, Andrew Beverley a...@andybev.com wrote: my $select_fields = $fields ? join(',', map { 'users.' . $_ } @fields) : '*'; my $select_fields = @fields ? join(',', map { 'users.' . $_ }

Re: Using grep on undefined array

2013-08-13 Thread Paul Makepeace
On Tue, Aug 13, 2013 at 4:09 PM, Andrew Beverley a...@andybev.com wrote: get(); sub get($) (You probably know this but calling get() like that, i.e. before it's declared, is denying perl the chance to enforce the subroutine prototype.)