Bug#435806: manpage example does not work

[gregor herrmann]

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
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 189 bytes
Desc: Digital signature
Url : http://lists.alioth.debian.org/pipermail/pkg-perl-maintainers/attachments/20070803/381949af/attachment.pgp