use strict;
use warnings;
use Win32::OLE;

my $hashRef = Win32::OLE->new('Excel.Application') or die "Can't open 
+Excel";
my @keys = keys %{$hashRef};

print "@keys\n";
[download]

Prints (in part):

Application Creator Parent ActiveCell ActiveChart ActivePrinter Active
+Sheet ActiveWindow ActiveWorkbook Assistant Cells Charts CommandBars 
+DDEAppReturnCode Names Range Selection Sheets ThisWorkbook
[download]

Is there soemthing else you aren't telling us? Are you using use strict; use warnings;? Do you check that your Win32::OLE->new succeded?