my $Doc = $Word->Documents->Open($mydocument);
$Doc->ActiveWindow->Selection->HomeKey(wdStory);
$Doc->ActiveWindow->Selection->WholeStory;
$Doc->ActiveWindow->Selection->Font->Size('9pt');