File: module_version.t

package info (click to toggle)
cpanminus 1.7048-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 2,372 kB
  • sloc: perl: 14,713; makefile: 5
file content (18 lines) | stat: -rw-r--r-- 393 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
use strict;
use Test::More;
use JSON;
use Config;
use xt::Run;

my $local_lib = "$ENV{PERL_CPANM_HOME}/perl5";

run_L "JMADLER/Log-Tiny-0.9b.tar.gz";
my $file = "$local_lib/lib/perl5/$Config{archname}/.meta/Log-Tiny-0.9b/install.json";
open my $in, "<", $file or die $!;

my $data = JSON::decode_json(join "", <$in>);
is $data->{name}, "Log::Tiny";
is $data->{version}, '0.9';

done_testing;