Second Life Blog

$word=new COM("word.application") or die("Cannot start word");

print "Loaded word version ($word->Version)n";

$word->visible =1;

$word->Documents->Add();

$word->Selection->Typetext("This is a test");

$word->Documents[1]->SaveAs("New.doc");

$word->Quit();