$Word->Selection->TypeText ({ Text => "The Title",
                                       Style => 'Heading 1',
  });