I am using Excel 2007 on a windows XP PC. Typically I just use the following at the beginning of Perl where I am reading and/or writing Excel spreadsheets.

use Win32::OLE;
use Win32::OLE qw(in with);
use Win32::OLE::Variant;
use Win32::OLE::Const 'Microsoft Excel';
[download]

In the O’Reilly Excel Macros by Steven Roman there are given a number of lists of constants which all start with
Enum property name
with the constant name and values underneath
For example, the first three for XLFileFormat are given as
xlAddIn = 18
xlCSV = 6
xlCSVMac = 22
It would be very helpful to be able to write out these lists.

‘John’ replied to an earlier request of mine with the Perl code of

use strict;
use Win32::OLE;
use Win32::OLE::Const;
my $xl = Win32::OLE::Const->Load("Microsoft Excel");
printf "Excel type library contains %d constants:\n", scalar keys %$xl
+;
foreach my $Key (sort keys %$xl) {
    print "$Key = $xl->{$Key}\n";
}
[download]

This does seem to give all the values of the constants that I am looking for. However, it does not associate these with any property
Is there any way that Perl can be used to write out these lists so that I can tell with which property they can be used with?
For me it would be perfectly acceptable to have a whole of statements like

Enum(‘XLFileFormat');
[download]