Re^2: undefined elements in array

mapping function can quite nice for this type of thing..

e.g.
@a = (1,2,3,undef,5);
print $#a;
@b = map(defined, @a);
print join(',',@b);
[download]

Comment on Re^2: undefined elements in array Download Code

Replies are listed 'Best First'.

Re^3: undefined elements in array
by Athanasius (Archbishop) on Aug 20, 2013 at 14:17 UTC

I think you meant grep, not map:

 0:14 >perl -wE "@a = (1,2,3,undef,5); say scalar @a; @b = map(defined
+, @a); print join(',', @b);"
5
1,1,1,,1
 0:14 >perl -wE "@a = (1,2,3,undef,5); say scalar @a; @b = grep(define
+d, @a); print join(',', @b);"
5
1,2,3,5
 0:14 >
[download]

Hope that helps,

Athanasius <°(((>< contra mundum Iustus alius egestas vitae, eros Piratica,

[reply]
[d/l]