That snippet will never work. You need to use IPC::ShareLite, but more importantly: how do you expect to fetch something from shared memory if you have not stored anything there in the first place?

I would first check that storable is working by freeze/thaw a var and make sure you get it back. Then store the serialised obect into shared memory, get it back, deserialize and check, then try to do it all in one line if you really want to. Untested: Works fine on RH 7.3 with Perl 5.6.2 and module versions shown. 

#!/usr/bin/perl -w

use strict;
use Storable qw( freeze thaw);
use IPC::ShareLite;
printf "Storable %s\nIPC::ShareLite %s\n", $Storable::VERSION, $IPC::S
+hareLite::VERSION;

my $ary = [ qw( Use shared memory ) ];

my $frozen = freeze( $ary );
my $thaw   = thaw( $frozen );
print "Freeze/thaw ok\n" if "@$ary" eq "@$thaw";

my $share = new IPC::ShareLite(-key=>1971,
                               -create=>"yes",
                               -destroy=>"no")
                  or die $!;

$share->store( $frozen );
my $shm_frozen = $share->fetch;
my $shm_thaw = thaw( $shm_frozen );
print "Share mem freeze/thaw ok\n@$shm_thaw!\n" if "@$ary" eq "@$shm_t
+haw";

[root@devel3 root]# ./shm_test.pl
Storable 1.014
IPC::ShareLite 0.09
Freeze/thaw ok
Share mem freeze/thaw ok
Use shared memory!
[root@devel3 root]#

[download]

cheers

tachyon

In reply to Re: Storable image problem by tachyon
in thread Storable image problem by judicar

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.