$obj->{header}{'My Header'} = $value;
if ( $obj->{header}{'My Header'} eq 'value' ) # ...