What you need to do is update the lines that pull in the constants like msoFalse Here are all the 'use' lines that I had to use to get second example to work with Office 2003:

use warnings;
use strict;

use Win32::OLE;
use Win32::OLE::Const 'Microsoft Office 11.0 Object Library';    
use Win32::OLE::Const 'Microsoft Office Runtime 1.0 Type Library'; 
use Win32::OLE::Const 'Microsoft Word 11.0 Object Library';
[download]