|
Apache/2.2.15 (CentOS) Linux obd60-6c49958d75-2q7cw 5.4.0-174-generic #193-Ubuntu SMP Thu Mar 7 14:29:28 UTC 2024 x86_64 uid=48(apache) gid=48(apache) groups=48(apache) server ip : 172.67.192.52 | your ip : 10.244.126.0 safemode OFF > / usr / lib64 / perl5 / bits / |
| Filename | /usr/lib64/perl5/bits/sockaddr.ph |
| Size | 507 |
| Permission | rw-r--r-- |
| Owner | apache |
| Create time | 23-Dec-2025 17:41 |
| Last modified | 22-Mar-2017 16:32 |
| Last accessed | 22-Mar-2017 16:32 |
| Actions | edit | rename | delete | download (gzip) |
| View | text | code | image |
require '_h2ph_pre.ph';
no warnings qw(redefine misc);
unless(defined(&_BITS_SOCKADDR_H)) {
eval 'sub _BITS_SOCKADDR_H () {1;}' unless defined(&_BITS_SOCKADDR_H);
eval 'sub __SOCKADDR_COMMON {
my($sa_prefix) = @_;
eval q( &sa_family_t $sa_prefix &family);
}' unless defined(&__SOCKADDR_COMMON);
eval 'sub __SOCKADDR_COMMON_SIZE () {($sizeof{\'unsigned short int\'});}' unless defined(&__SOCKADDR_COMMON_SIZE);
eval 'sub _SS_SIZE () {128;}' unless defined(&_SS_SIZE);
}
1;
no warnings qw(redefine misc);
unless(defined(&_BITS_SOCKADDR_H)) {
eval 'sub _BITS_SOCKADDR_H () {1;}' unless defined(&_BITS_SOCKADDR_H);
eval 'sub __SOCKADDR_COMMON {
my($sa_prefix) = @_;
eval q( &sa_family_t $sa_prefix &family);
}' unless defined(&__SOCKADDR_COMMON);
eval 'sub __SOCKADDR_COMMON_SIZE () {($sizeof{\'unsigned short int\'});}' unless defined(&__SOCKADDR_COMMON_SIZE);
eval 'sub _SS_SIZE () {128;}' unless defined(&_SS_SIZE);
}
1;