HEX
Server: nginx/1.18.0
System: Linux oas2 6.8.0-1039-oracle #40~22.04.1-Ubuntu SMP Wed Oct 29 05:11:00 UTC 2025 aarch64
User: root (0)
PHP: 8.1.2-1ubuntu2.23
Disabled: NONE
Upload Files
File: //usr/lib/aarch64-linux-gnu/perl/5.34.0/bits/getopt_posix.ph
require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_GETOPT_POSIX_H)) {
    eval 'sub _GETOPT_POSIX_H () {1;}' unless defined(&_GETOPT_POSIX_H);
    if(!defined (&_UNISTD_H)  && !defined (&_STDIO_H)) {
	die("Never include getopt_posix.h directly; use unistd.h instead.");
    }
    require 'bits/getopt_core.ph';
    if(defined (&__USE_POSIX2)  && !defined (&__USE_POSIX_IMPLICITLY)  && !defined (&__USE_GNU)  && !defined (&_GETOPT_H)) {
	if(defined(&__REDIRECT)) {
	} else {
	    eval 'sub getopt () { &__posix_getopt;}' unless defined(&getopt);
	}
    }
}
1;