Select Code to Download

 
sub explore {
    my $obj = shift;
...
    }
    }
}

explore( $datasheet );

        Application => Win32::OLE=HASH(0x385ca80)
        Cells => Win32::OLE=HASH(0x3491660)
...
        Rows => Win32::OLE=HASH(0x3491708)
        Top => 4337
        Width => 0