%a = (font => 'Arial',
          size => 10,
          bold => 0);
    %b = (size => 12);

    %fmt = (%a, %b);

##</code><code>##

    $object->write( 'Some Stuff', 
                    $object2->format( %a, (size => 12)) );