in reply to Re^2: perl script for wordin thread perl script for word
use constant { wdCharacter => 1, wdOutlineView => 2, wdPrintView => 3, }; [download]