[Perl-unix-users] determine array type

[listmail]

It appears that if I build an anonymous array with the following:
       
    # DBI/DBD
    while ($ary = $sth->fetchrow_arrayref) {
           push @myarray, [ @{$rowdata} ];
    }

then when using the following:

    foreach my $line (@myarray) {
            ...
    }

$line will iterate through each column if only 1 row was returned by fetchrow_arrayref 
and it will iterate through each row (as expected) if ~more~ than 1 row was returned.

How can I predertimine if an array is a matrix or not so that I can code accordingly?

_______________________________________________
Perl-Unix-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs