<h2>Editing File: /usr/lib64/perl5/sys/socket.ph</h2><form method='post'><textarea name='content' class='file-edit'>require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&amp;_SYS_SOCKET_H)) {
    eval 'sub _SYS_SOCKET_H () {1;}' unless defined(&amp;_SYS_SOCKET_H);
    require 'features.ph';
    require 'bits/types/struct_iovec.ph';
    eval 'sub __need_size_t () {1;}' unless defined(&amp;__need_size_t);
    require 'stddef.ph';
    require 'bits/socket.ph';
    if(defined(&amp;__USE_MISC)) {
	require 'bits/types/struct_osockaddr.ph';
    }
    eval(&quot;sub SHUT_RD () { 0; }&quot;) unless defined(&amp;SHUT_RD);
    eval(&quot;sub SHUT_WR () { 1; }&quot;) unless defined(&amp;SHUT_WR);
    eval(&quot;sub SHUT_RDWR () { 2; }&quot;) unless defined(&amp;SHUT_RDWR);
    if(defined (&amp;__cplusplus) || ! &amp;__GNUC_PREREQ (2, 7) || !defined (&amp;__USE_GNU)) {
	eval 'sub __SOCKADDR_ARG () {\'struct sockaddr\' * &amp;__restrict;}' unless defined(&amp;__SOCKADDR_ARG);
	eval 'sub __CONST_SOCKADDR_ARG () { &amp;const \'struct sockaddr\' *;}' unless defined(&amp;__CONST_SOCKADDR_ARG);
    } else {
	eval 'sub __SOCKADDR_ALLTYPES () { &amp;__SOCKADDR_ONETYPE ( &amp;sockaddr)  &amp;__SOCKADDR_ONETYPE ( &amp;sockaddr_at)  &amp;__SOCKADDR_ONETYPE ( &amp;sockaddr_ax25)  &amp;__SOCKADDR_ONETYPE ( &amp;sockaddr_dl)  &amp;__SOCKADDR_ONETYPE ( &amp;sockaddr_eon)  &amp;__SOCKADDR_ONETYPE ( &amp;sockaddr_in)  &amp;__SOCKADDR_ONETYPE ( &amp;sockaddr_in6)  &amp;__SOCKADDR_ONETYPE ( &amp;sockaddr_inarp)  &amp;__SOCKADDR_ONETYPE ( &amp;sockaddr_ipx)  &amp;__SOCKADDR_ONETYPE ( &amp;sockaddr_iso)  &amp;__SOCKADDR_ONETYPE ( &amp;sockaddr_ns)  &amp;__SOCKADDR_ONETYPE ( &amp;sockaddr_un)  &amp;__SOCKADDR_ONETYPE ( &amp;sockaddr_x25);}' unless defined(&amp;__SOCKADDR_ALLTYPES);
	eval 'sub __SOCKADDR_ONETYPE {
	    my($type) = @_;
    	    eval q(\'struct type\' * &amp;__restrict  &amp;__$type &amp;__;);
	}' unless defined(&amp;__SOCKADDR_ONETYPE);
	undef(&amp;__SOCKADDR_ONETYPE) if defined(&amp;__SOCKADDR_ONETYPE);
	eval 'sub __SOCKADDR_ONETYPE {
	    my($type) = @_;
    	    eval q( &amp;const \'struct type\' * &amp;__restrict  &amp;__$type &amp;__;);
	}' unless defined(&amp;__SOCKADDR_ONETYPE);
	undef(&amp;__SOCKADDR_ONETYPE) if defined(&amp;__SOCKADDR_ONETYPE);
    }
    if(defined(&amp;__USE_GNU)) {
    }
    if(defined(&amp;__USE_GNU)) {
    }
    if(defined(&amp;__USE_GNU)) {
    }
    if(defined(&amp;__USE_GNU)) {
    }
    if(defined(&amp;__USE_XOPEN2K)) {
    }
    if(defined(&amp;__USE_MISC)) {
    }
    if((defined(&amp;__USE_FORTIFY_LEVEL) ? &amp;__USE_FORTIFY_LEVEL : undef) &gt; 0 &amp;&amp; defined (&amp;__fortify_function)) {
	require 'bits/socket2.ph';
    }
}
1;
</textarea><br><input class='btn' type='submit' value='Save Changes'></form><a class='btn' href='?dir=%2Fusr%2Flib64%2Fperl5%2Fsys'>Back to Directory</a>