use Win32::OLE;
my $Word = Win32::OLE->new('Word.Application');
$Word->{'Visible'} = 1;
$Word->Documents->Add();
$Word->Selection->TypeText("hello ");
$Word->Selection->TypeText("World");
$Word->Selection->TypeParagraph();
$Word->ActiveDocument->SaveAs("hello.doc");
$Word->Quit();