cleen has asked for the wisdom of the Perl Monks concerning the following question:
....... Ok everything is fine and dandy, I can get the information back fine on the next run and see what was in %lastpeering from memory, but uhhh:use IPC::Shareable; my %peering; my %lastpeering; my %options_now = ( create => 'yes', exclusive => 'no', mode => 0666, destroy => 'no' ); my %options_then = ( create => 'yes', exclusive => 'no', mode => 0666, destroy => 'no' ); tie %lastpeering, 'IPC::Shareable', $glue, \%options2 or die "tie fa +iled\n"; tie %peering, 'IPC::Shareable', $glue, \%options or die "tie failed\n" +;
ipcs ------ Shared Memory Segments -------- key shmid owner perms bytes nattch status + 0x30787566 896513 mthomas 666 65536 0 + 0x0000715f 896515 mthomas 666 65536 0 + 0x0004d733 896516 mthomas 666 65536 0 + 0x000d0241 896517 mthomas 666 65536 0 + 0x00001058 896518 mthomas 666 65536 0 + 0x000f1708 896519 mthomas 666 65536 0 + 0x00078ab1 896520 mthomas 666 65536 0 + 0x00023842 896521 mthomas 666 65536 0 + 0x00011d03 896522 mthomas 666 65536 0 + 0x00094861 896523 mthomas 666 65536 0 + 0x000c10f3 896524 mthomas 666 65536 0 + 0x0000e876 896525 mthomas 666 65536 0 + 0x00023a9c 896526 mthomas 666 65536 0 + 0x000071f6 896527 mthomas 666 65536 0 + ------ Semaphore Arrays -------- key semid owner perms nsems status 0x30787566 896640 mthomas 666 2 0x0000715f 896642 mthomas 666 2 0x0004d733 896643 mthomas 666 2 0x000d0241 896644 mthomas 666 2 0x00001058 896645 mthomas 666 2 0x000f1708 896646 mthomas 666 2 0x00078ab1 896647 mthomas 666 2 0x00023842 896648 mthomas 666 2 0x00011d03 896649 mthomas 666 2 0x00094861 896650 mthomas 666 2 0x000c10f3 896651 mthomas 666 2 0x0000e876 896652 mthomas 666 2 0x00023a9c 896653 mthomas 666 2 0x000071f6 896654 mthomas 666 2
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: IPC Shared Memory Question
by cleen (Pilgrim) on Mar 03, 2001 at 09:15 UTC | |
|
Re: IPC Shared Memory Question
by cleen (Pilgrim) on Mar 03, 2001 at 09:08 UTC |