foreach my $para (in $Doc->Paragraphs()) {