ヤミRoot VoidGate
User / IP
:
216.73.216.2
Host / Server
:
146.88.233.70 / dev.loger.cm
System
:
Linux hybrid1120.fr.ns.planethoster.net 3.10.0-957.21.2.el7.x86_64 #1 SMP Wed Jun 5 14:26:44 UTC 2019 x86_64
Command
|
Upload
|
Create
Mass Deface
|
Jumping
|
Symlink
|
Reverse Shell
Ping
|
Port Scan
|
DNS Lookup
|
Whois
|
Header
|
cURL
:
/
home
/
itrave
/
.cpanm
/
work
/
1568630761.27314
/
DateTime-1.51
/
t
/
Viewing: 27delta.t
use strict; use warnings; use Test::More; use DateTime; { my $date1 = DateTime->new( year => 2001, month => 5, day => 10, hour => 4, minute => 3, second => 2, nanosecond => 12, time_zone => 'UTC' ); my $date2 = DateTime->new( year => 2001, month => 6, day => 12, hour => 5, minute => 7, second => 23, nanosecond => 7, time_zone => 'UTC' ); { my $dur_md = $date2->delta_md($date1); is( $dur_md->delta_months, 1, 'delta_md months is 1' ); is( $dur_md->delta_days, 2, 'delta_md days is 2' ); is( $dur_md->delta_minutes, 0, 'delta_md minutes is 0' ); is( $dur_md->delta_seconds, 0, 'delta_md seconds is 0' ); is( $dur_md->delta_nanoseconds, 0, 'delta_md nanoseconds is 0' ); my $dur_d = $date2->delta_days($date1); is( $dur_d->delta_months, 0, 'delta_d months is 0' ); is( $dur_d->delta_days, 33, 'delta_d days is 33' ); is( $dur_d->delta_minutes, 0, 'delta_d minutes is 0' ); is( $dur_d->delta_seconds, 0, 'delta_d seconds is 0' ); is( $dur_d->delta_nanoseconds, 0, 'delta_d nanoseconds is 0' ); my $dur_ms = $date2->delta_ms($date1); is( $dur_ms->delta_months, 0, 'delta_ms months is 0' ); is( $dur_ms->delta_days, 0, 'delta_ms days is 0' ); is( $dur_ms->delta_minutes, 47584, 'delta_ms minutes is 47584' ); is( $dur_ms->delta_seconds, 20, 'delta_ms seconds is 20' ); is( $dur_ms->delta_nanoseconds, 0, 'delta_ms nanoseconds is 0' ); is( $dur_ms->hours, 793, 'hours is 793' ); } { my $dur_md = $date1->delta_md($date2); is( $dur_md->delta_months, 1, 'delta_md months is 1' ); is( $dur_md->delta_days, 2, 'delta_md days is 2' ); is( $dur_md->delta_minutes, 0, 'delta_md minutes is 0' ); is( $dur_md->delta_seconds, 0, 'delta_md seconds is 0' ); is( $dur_md->delta_nanoseconds, 0, 'delta_md nanoseconds is 0' ); my $dur_d = $date1->delta_days($date2); is( $dur_d->delta_months, 0, 'delta_d months is 0' ); is( $dur_d->delta_days, 33, 'delta_d days is 33' ); is( $dur_d->delta_minutes, 0, 'delta_d minutes is 0' ); is( $dur_d->delta_seconds, 0, 'delta_d seconds is 0' ); is( $dur_d->delta_nanoseconds, 0, 'delta_d nanoseconds is 0' ); my $dur_ms = $date1->delta_ms($date2); is( $dur_ms->delta_months, 0, 'delta_ms months is 0' ); is( $dur_ms->delta_days, 0, 'delta_ms days is 0' ); is( $dur_ms->delta_minutes, 47584, 'delta_ms minutes is 47584' ); is( $dur_ms->delta_seconds, 20, 'delta_ms seconds is 20' ); is( $dur_ms->delta_nanoseconds, 0, 'delta_ms nanoseconds is 0' ); is( $dur_ms->hours, 793, 'hours is 793' ); } } { my $date1 = DateTime->new( year => 2001, month => 5, day => 10, hour => 15, minute => 0, second => 0, time_zone => 'UTC' ); my $date2 = DateTime->new( year => 2001, month => 5, day => 11, hour => 12, minute => 30, second => 10, time_zone => 'UTC' ); my $dur_ms = $date1->delta_ms($date2); is( $dur_ms->delta_months, 0, 'delta_ms months is 0' ); is( $dur_ms->delta_days, 0, 'delta_ms days is 0' ); is( $dur_ms->delta_minutes, 1290, 'delta_ms minutes is 1290' ); is( $dur_ms->delta_seconds, 10, 'delta_ms seconds is 30' ); is( $dur_ms->delta_nanoseconds, 0, 'delta_ms nanoseconds is 0' ); is( $dur_ms->hours, 21, 'hours is 21' ); } done_testing();
Coded With 💗 by
0x6ick