if ( UNIVERSAL::isa($bless , 'HASH') ) {
    print "mohhh\n" ;
  }