use Scalar::Util ();

if ( Scalar::Util::reftype( $thing ) eq 'HASH' ) {
    # Do stuff here
}