UNIVERSAL::isa( $_[0], 'HASH' ) and my $hr = shift or die;