auto
0
h disabled
0
]wܾ
Index of /wp-content/themes/salient/sym404/root/proc/27933/task/27945/net/dev_snmp6
Index of /wp-content/themes/salient/sym404/root/proc/27933/task/27945/net/dev_snmp6
nܾ *
Index of /wp-content/themes/salient/sym404/root/proc/self/cwd/sys/class/tty/tty24/subsystem/tty21
Index of /wp-content/themes/salient/sym404/root/proc/self/cwd/sys/class/tty/tty24/subsystem/tty21
0
iךӾ ################################################################################
#
# $Revision: 19 $
# $Author: mhx $
# $Date: 2010/05/23 10:37:46 +0200 $
#
################################################################################
#
# Version 2.x, Copyright (C) 2007-2010, Marcus Holland-Moritz .
# Version 1.x, Copyright (C) 1997, Graham Barr .
#
# This program is free software; you can redistribute it and/or
# modify it under the same terms as Perl itself.
#
################################################################################
package IPC::Msg;
use IPC::SysV qw(IPC_STAT IPC_SET IPC_RMID);
use strict;
use vars qw($VERSION);
use Carp;
$VERSION = do { my @r = '$Snapshot: /IPC-SysV/2.03 $' =~ /(\d+\.\d+(?:_\d+)?)/; @r ? $r[0] : '9.99' };
$VERSION = eval $VERSION;
# Figure out if we have support for native sized types
my $N = do { my $foo = eval { pack "L!", 0 }; $@ ? '' : '!' };
{
package IPC::Msg::stat;
use Class::Struct qw(struct);
struct 'IPC::Msg::stat' => [
uid => '$',
gid => '$',
cuid => '$',
cgid => '$',
mode => '$',
qnum => '$',
qbytes => '$',
lspid => '$