HEX
Server: nginx/1.26.1
System: Linux main-vm 5.15.0-153-generic #163-Ubuntu SMP Thu Aug 7 16:37:18 UTC 2025 x86_64
User: root (0)
PHP: 8.2.19
Disabled: NONE
Upload Files
File: //lib/x86_64-linux-gnu/perl/5.34/bits/sockaddr.ph
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;