*isa= \&UNIVERSAL::isa;
if(  isa($ref,"HASH")  ) {