Linux server.nvwebsoft.co.in 3.10.0-1160.114.2.el7.x86_64 #1 SMP Wed Mar 20 15:54:52 UTC 2024 x86_64
Apache
: 162.240.12.249 | : 18.191.171.136
202 Domain
8.1.31
nbspublicschool
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
lib64 /
perl5 /
vendor_perl /
[ HOME SHELL ]
Name
Size
Permission
Action
Attribute
[ DIR ]
drwxr-xr-x
BSD
[ DIR ]
drwxr-xr-x
Bundle
[ DIR ]
drwxr-xr-x
Compress
[ DIR ]
drwxr-xr-x
Crypt
[ DIR ]
drwxr-xr-x
DBD
[ DIR ]
drwxr-xr-x
DBI
[ DIR ]
drwxr-xr-x
Data
[ DIR ]
drwxr-xr-x
DateTime
[ DIR ]
drwxr-xr-x
Digest
[ DIR ]
drwxr-xr-x
Encode
[ DIR ]
drwxr-xr-x
File
[ DIR ]
drwxr-xr-x
Filesys
[ DIR ]
drwxr-xr-x
Filter
[ DIR ]
drwxr-xr-x
HTML
[ DIR ]
drwxr-xr-x
IO
[ DIR ]
drwxr-xr-x
JSON
[ DIR ]
drwxr-xr-x
List
[ DIR ]
drwxr-xr-x
Net
[ DIR ]
drwxr-xr-x
Package
[ DIR ]
drwxr-xr-x
Params
[ DIR ]
drwxr-xr-x
Readonly
[ DIR ]
drwxr-xr-x
Scalar
[ DIR ]
drwxr-xr-x
Sys
[ DIR ]
drwxr-xr-x
Template
[ DIR ]
drwxr-xr-x
Term
[ DIR ]
drwxr-xr-x
Text
[ DIR ]
drwxr-xr-x
Time
[ DIR ]
drwxr-xr-x
XML
[ DIR ]
drwxr-xr-x
YAML
[ DIR ]
drwxr-xr-x
auto
[ DIR ]
drwxr-xr-x
threads
[ DIR ]
drwxr-xr-x
version
[ DIR ]
drwxr-xr-x
CDB_File.pm
10.42
KB
-rw-r--r--
Curses.pm
34.98
KB
-rw-r--r--
Cwd.pm
21.25
KB
-rw-r--r--
DBI.pm
304.17
KB
-rw-r--r--
DB_File.pm
62.24
KB
-rw-r--r--
DateTime.pm
115.31
KB
-rw-r--r--
DateTimePP.pm
5.12
KB
-rw-r--r--
DateTimePPExtra.pm
1.33
KB
-rw-r--r--
Encode.pm
32.17
KB
-rw-r--r--
FCGI.pm
7.36
KB
-rw-r--r--
Socket.pm
35.47
KB
-rw-r--r--
Socket6.pm
9.57
KB
-rw-r--r--
Template.pm
24.41
KB
-rw-r--r--
bun-x.pl
1.22
KB
-rwxr-xr-x
dbixs_rev.pl
1.51
KB
-rwxr-xr-x
encoding.pm
20.04
KB
-rw-r--r--
threads.pm
34.48
KB
-rw-r--r--
version.pm
2.85
KB
-rw-r--r--
version.pod
9.6
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : DateTimePPExtra.pm
package DateTime; use strict; use warnings; use DateTime::LeapSecond; sub _normalize_tai_seconds { return if grep { $_ == INFINITY() || $_ == NEG_INFINITY() } @_[ 1, 2 ]; # This must be after checking for infinity, because it breaks in # presence of use integer ! use integer; my $adj; if ( $_[2] < 0 ) { $adj = ( $_[2] - 86399 ) / 86400; } else { $adj = $_[2] / 86400; } $_[1] += $adj; $_[2] -= $adj * 86400; } sub _normalize_leap_seconds { # args: 0 => days, 1 => seconds my $delta_days; use integer; # rough adjust - can adjust many days if ( $_[2] < 0 ) { $delta_days = ( $_[2] - 86399 ) / 86400; } else { $delta_days = $_[2] / 86400; } my $new_day = $_[1] + $delta_days; my $delta_seconds = ( 86400 * $delta_days ) + DateTime::LeapSecond::leap_seconds($new_day) - DateTime::LeapSecond::leap_seconds( $_[1] ); $_[2] -= $delta_seconds; $_[1] = $new_day; # fine adjust - up to 1 day my $day_length = DateTime::LeapSecond::day_length($new_day); if ( $_[2] >= $day_length ) { $_[2] -= $day_length; $_[1]++; } elsif ( $_[2] < 0 ) { $day_length = DateTime::LeapSecond::day_length( $new_day - 1 ); $_[2] += $day_length; $_[1]--; } } 1;
Close
