Select Code to Download

Selection.HomeKey wdStory
Selection.Text = "This is the inserted text 1"
...
Selection.Text = "This is the inserted text 2"
Selection.Collapse wdCollapseEnd
Selection.TypeParagraph

use strict;
use warnings;
...
$Word->Documents($file_name)->Save();
$Word->Quit();