<?$word = new COM("word.application") or die("Unable to instanciate Word");
print "Loaded Word, version {$word->Version}\n";$word->Visible = 1;
$word->ActivePrinter = "This is testing";$word->Documents->Open($input);
$word->ActiveDocument->PrintOut(0, 0, 0, $output);
$word->Quit();$word->Release();
$word = null;?>