$Word->Selection->TypeText ({ Text => "This is plain header text"});
$MyRange->Collapse({Direction=>wdCollapseEnd});
$Word->Selection->TypeText ({ Text => "\n\n" });   #add the table 2 lines below
$Word->Selection->MoveDown({Count => 2});