On Fri, 03 Aug 2007 12:22:26 +0200, martin f krafft wrote:
> use OLE::Storage_Lite;
> use strict;
> my $oOl = OLE::Storage_Lite->new('test.msg');
> my $oPps = $oOl->getPpsTree(1);
> $oPps->save('-');
>
> However, if I run it, I get
>
> Can't call method "save" on an undefined value at ole.pl line 5.
>
> I am not at all a perl coder, but I can't see the reason for the
> error.My guess is that OLE::Storage_Lite doesn't like your test.msg. Looking at /usr/share/doc/libole-storage-lite-perl/examples/smplls.pl you could * either add a line like die( "test.msg is not a OLE file" ) unless($oPps); before the ->save * or run perl /usr/share/doc/libole-storage-lite-perl/examples/smplls.pl test.msg to check. HTH, gregor -- .''`. http://info.comodo.priv.at/ | gpg key ID: 0x00F3CFE4 : :' : debian: the universal operating system - http://www.debian.org/ `. `' member of https://www.vibe.at/ | how to reply: http://got.to/quote/ `- NP: Status Quo: A Mess Of The Blues
signature.asc
Description: Digital signature
