'ARRAY' eq ref $x is a fragile construct. I think you (and more importantly, other people who want to use your code) will be better off if you use: UNIVERSAL::isa( $x, 'ARRAY' )

        - tye (but my friends call me "Tye")