my $document = $Word->Documents->Add;
my $selection = $Word->Selection;