I'm sort of new to shared memory and sockets, but i'm trying to write a tcp/ip listener, that reads and parses a message from a client, then stores the new message and the socket object in a shared memory variable.
I keep getting the following error: 
Can't store GLOB items at blib/lib/Storable.pm (autosplit into blib/li
+b/auto/Storable/_freeze.al) line 180, <GEN1> line 1, at /usr/lib/perl
+5/site_perl/5.6.1/IPC/Shareable.pm line 523

[download]
Is there a way to store the socket object in the shared memory variable? Here is the code 
use IPC::Shareable;
use IO::Socket;
my $Socket = IO::Socket::INET->new(
                LocalPort => 8190,
                Type      => SOCK_STREAM,
                Reuse     => 1,
                Listen    => 1 );
if (not defined $Socket){
        die "ERROR: cannot listen on port 8190: [$!]\n";
}


my %options = (
    create    => 'yes',
    exclusive => 0,
    mode      => 0666,
    destroy   => 'yes'
);

$IPC2 = tie $ProcessedMessages, 'IPC::Shareable', 'data', { %options }
+ or
     die "client: tie failed\n";
$ProcessedMessages = [];

...

while($client = $Socket->accept()){
  my $msg;
  $msg = <$client>;
  chomp $msg;
  my $pid = fork();
  if(not defined $pid){
    die "Fork Error: $!\n";
  }

  #Child
  if($pid == 0){
      &Process($msg, $client);
      exit();
  }else{
      close($client);
  }
}

sub Process{
  my $msg = $_[0];
  my $client = $_[1];

  ...Do Some Message Processing...

  $IPC2->shlock;
  my %tmp = (
             Message => $msg,
             Connection => $client ##Problem
            );
  push(@{$ProcessedMessages},\%tmp);
  $IPC2->shunlock;
  print $client "$msg\n";
  close($client);
}

[download]

In reply to Storing Socket Connections in Shared Memory by tcf22

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.