In order to go to the end of the document, you can do the following:

use Win32::OLE::Const 'Microsoft.Word';    # wd  constants
$word->Selection->EndKey(wdStory);
[download]

UPDATE: This also works:

$table->Select();
$doc->ActiveWindow->Selection->MoveDown(wdLine,1);
$doc->ActiveWindow->Selection->TypeText("This line should be after the
+ table");
[download]

Department of Experimental Computer Science