' VB Code, written without either VB or MS Word available to check

set objWord = CreateObject("Word.Application")
objWord.DocumentNew()
objWord.Document.Text = "Hello World"
objWord.Document.SelectAll()

# Perl code
use strict;
my $word = Win32::OLE->new('Word.Application');
$word->DocumentNew();
$word->{Document}->{Text} = "Hello World";
$word->{Document}->SelectAll;