my $text = $selection->{Range}{Paragraph}{Text};