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