Re: Is there an isArray() in Perl?

Alternatively, you can use universal.pm

use UNIVERSAL 'isa';

foreach $item (@array) {

if (isa($item, 'ARRAY')) {
print "We've got an array!!\n";
}

}
[download]

Comment on Re: Is there an isArray() in Perl? Download Code

Replies are listed 'Best First'.
Re: Answer: Is there an isArray() in Perl? by salva (Canon) on May 11, 2005 at 10:42 UTC
UNIVERSAL is available even without `use`'ing it, so the previous code snippet can be rewritten as: `foreach $item (@array) { if (UNIVERSAL::isa($item, 'ARRAY')) { print "We've got an array!!\n"; } }` [download]	[reply] [d/l] [select]
Re^2: Answer: Is there an isArray() in Perl? by ysth (Canon) on May 13, 2005 at 16:13 UTC
Correct; the only point of use'ing UNIVERSAL is to import the function(s)...which he does.	[reply]