if( ref( $var ) eq 'ARRAY' )
{
    # $var is a ref to an array
}