403Webshell
Server IP : 62.72.47.131  /  Your IP : 216.73.217.34
Web Server : Apache/2.4.66 (Debian)
System : Linux 975cdb959a49 5.14.0-611.55.1.el9_7.x86_64 #1 SMP PREEMPT_DYNAMIC Tue May 19 15:19:29 EDT 2026 x86_64
User :  ( 501)
PHP Version : 8.3.30
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : OFF  |  Perl : ON  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /lib/x86_64-linux-gnu/perl/5.40/bits/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /lib/x86_64-linux-gnu/perl/5.40/bits/select.ph
require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_SYS_SELECT_H)) {
    die("Never use <bits/select.h> directly; include <sys/select.h> instead.");
}
eval 'sub __FD_ZERO {
    my($s) = @_;
	eval q( &do { \'unsigned int __i\';  &fd_set * &__arr = ($s);  &for ( &__i = 0;  &__i < $sizeof{ &fd_set} / $sizeof{ &__fd_mask}; ++ &__i)  &__FDS_BITS ( &__arr)[ &__i] = 0; }  &while (0));
}' unless defined(&__FD_ZERO);
eval 'sub __FD_SET {
    my($d, $s) = @_;
	eval q((( &void) ( &__FDS_BITS ($s)[ &__FD_ELT($d)] |=  &__FD_MASK($d))));
}' unless defined(&__FD_SET);
eval 'sub __FD_CLR {
    my($d, $s) = @_;
	eval q((( &void) ( &__FDS_BITS ($s)[ &__FD_ELT($d)] &= ~ &__FD_MASK($d))));
}' unless defined(&__FD_CLR);
eval 'sub __FD_ISSET {
    my($d, $s) = @_;
	eval q((( &__FDS_BITS ($s)[ &__FD_ELT ($d)] &  &__FD_MASK ($d)) != 0));
}' unless defined(&__FD_ISSET);
1;

Youez - 2016 - github.com/yon3zu
LinuXploit