Select Code to Download

for my $para (1..$doc->Paragraphs->Count) {
    $doc->Selection->GoTo( What => wdGoToParagraph, Which => wdGoToAbs
+olute, Count => $i );
...

    ...
}