Linux worldls-302.fr.planethoster.net 4.18.0-553.8.1.lve.el7h.x86_64 #1 SMP Thu Jul 4 15:19:33 UTC 2024 x86_64
LiteSpeed
Server IP : 10.185.0.203 & Your IP : 216.73.216.32
Domains :
Cant Read [ /etc/named.conf ]
User : gerathty
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
local /
share /
perl5 /
Test2 /
Compare /
Delete
Unzip
Name
Size
Permission
Date
Action
Array.pm
7.98
KB
-r--r--r--
2019-03-16 23:17
Bag.pm
4.68
KB
-r--r--r--
2019-03-16 23:17
Base.pm
5.6
KB
-r--r--r--
2019-03-16 23:17
Bool.pm
1.82
KB
-r--r--r--
2019-03-16 23:17
Custom.pm
3.11
KB
-r--r--r--
2019-03-16 23:17
DeepRef.pm
1.94
KB
-r--r--r--
2019-03-16 23:17
Delta.pm
12.85
KB
-r--r--r--
2019-03-16 23:17
Event.pm
1.32
KB
-r--r--r--
2019-03-16 23:17
EventMeta.pm
1.62
KB
-r--r--r--
2019-03-16 23:17
Float.pm
3.98
KB
-r--r--r--
2019-03-16 23:17
Hash.pm
5.75
KB
-r--r--r--
2019-03-16 23:17
Meta.pm
2.85
KB
-r--r--r--
2019-03-16 23:17
Negatable.pm
2.2
KB
-r--r--r--
2019-03-16 23:17
Number.pm
2.56
KB
-r--r--r--
2019-03-16 23:17
Object.pm
6.08
KB
-r--r--r--
2019-03-16 23:17
OrderedSubset.pm
3.39
KB
-r--r--r--
2019-03-16 23:17
Pattern.pm
1.67
KB
-r--r--r--
2019-03-16 23:17
Ref.pm
1.92
KB
-r--r--r--
2019-03-16 23:17
Regex.pm
1.52
KB
-r--r--r--
2019-03-16 23:17
Scalar.pm
2
KB
-r--r--r--
2019-03-16 23:17
Set.pm
2.91
KB
-r--r--r--
2019-03-16 23:17
String.pm
1.79
KB
-r--r--r--
2019-03-16 23:17
Undef.pm
1.27
KB
-r--r--r--
2019-03-16 23:17
Wildcard.pm
1.13
KB
-r--r--r--
2019-03-16 23:17
Save
Rename
package Test2::Compare::Event; use strict; use warnings; use Scalar::Util qw/blessed/; use Test2::Compare::EventMeta(); use base 'Test2::Compare::Object'; our $VERSION = '0.000119'; use Test2::Util::HashBase qw/etype/; sub name { my $self = shift; my $etype = $self->etype; return "<EVENT: $etype>"; } sub meta_class { 'Test2::Compare::EventMeta' } sub object_base { 'Test2::Event' } sub got_lines { my $self = shift; my ($event) = @_; return unless $event; return unless blessed($event); return unless $event->isa('Test2::Event'); return unless $event->trace; return ($event->trace->line); } 1; __END__ =pod =encoding UTF-8 =head1 NAME Test2::Compare::Event - Event specific Object subclass. =head1 DESCRIPTION This module is used to represent an expected event in a deep comparison. =head1 SOURCE The source code repository for Test2-Suite can be found at F<https://github.com/Test-More/Test2-Suite/>. =head1 MAINTAINERS =over 4 =item Chad Granum E<lt>exodist@cpan.orgE<gt> =back =head1 AUTHORS =over 4 =item Chad Granum E<lt>exodist@cpan.orgE<gt> =back =head1 COPYRIGHT Copyright 2018 Chad Granum E<lt>exodist@cpan.orgE<gt>. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See F<http://dev.perl.org/licenses/> =cut