in reply to Re^2: How to get the CLSID with OLE::Storage?
in thread How to get the CLSID with OLE::Storage?

print $Doc->clsid($pps)->string()
Err, that's exactly the same as what I wrote. :-)

-David