Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: To test empty array in perl

by nvivek (Vicar)
on Apr 27, 2010 at 04:19 UTC ( [id://837017]=note: print w/replies, xml ) Need Help??


in reply to To test empty array in perl

If you want to check whether the array is empty.You can do in the following ways.

print "Array isn't empty.Array Values:@array\n" if($array[0]);
print "Array isn't empty.Array Values:@array\n" if($#array >= 0);
print "Array isn't empty.Array Values:@array\n" if(@array);

[download]

Replies are listed 'Best First'.
Re^2: To test empty array in perl
by nagalenoj (Friar) on Apr 27, 2010 at 04:44 UTC 
    print "Array isn't empty.Array Values:@array\n" if($array[0]);

    [download]

    This won't tell you whether the array is empty.

    What happens when the first index of array has undef or 0.? 

    # my @array = (0, undef, 1, 2, 3);
my @array = (undef, undef, 1, 2, 3);

print "Array isn't empty.Array Values:@array\n" if($array[0]);

    [download]
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://837017]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others lurking in the Monastery: (3)
As of 2024-04-25 20:59 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found