Archive-Libarchive-Peek

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "Test::Spelling" : "0",
            "Test::Strict" : "0",
            "YAML" : "0"
         }
      },
      "runtime" : {
         "requires" : {
            "Alias::Any" : "0",
            "Archive::Libarchive" : "0.03",
            "Path::Tiny" : "0",
            "Ref::Util" : "0",
            "perl" : "v5.20.0"
         }
      },
      "test" : {
         "requires" : {
            "File::chdir" : "0",
            "Test2::V0" : "0.000121",
            "Test::Script" : "1.09",
            "perl" : "v5.20.0"
         }

META.yml  view on Meta::CPAN

generated_by: 'Dist::Zilla version 6.032, CPAN::Meta::Converter version 2.150010'
license: perl
meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: '1.4'
name: Archive-Libarchive-Peek
requires:
  Alias::Any: '0'
  Archive::Libarchive: '0.03'
  Path::Tiny: '0'
  Ref::Util: '0'
  perl: v5.20.0
resources:
  IRC: irc://irc.perl.org/#native
  bugtracker: https://github.com/uperl/Archive-Libarchive-Peek/issues
  homepage: https://metacpan.org/pod/Archive::Libarchive::Peek
  repository: git://github.com/uperl/Archive-Libarchive-Peek.git
version: '0.05'
x_generated_by_perl: v5.40.0
x_serialization_backend: 'YAML::Tiny version 1.74'
x_spdx_expression: 'Artistic-1.0-Perl OR GPL-1.0-or-later'

Makefile.PL  view on Meta::CPAN

  "LICENSE"          => "perl",
  "MIN_PERL_VERSION" => "5.020000",
  "NAME"             => "Archive::Libarchive::Peek",
  "PM"               => {
    "lib/Archive/Libarchive/Peek.pm" => "\$(INST_LIB)/Archive/Libarchive/Peek.pm"
  },
  "PREREQ_PM" => {
    "Alias::Any"          => 0,
    "Archive::Libarchive" => "0.03",
    "Path::Tiny"          => 0,
    "Ref::Util"           => 0
  },
  "TEST_REQUIRES" => {
    "File::chdir"  => 0,
    "Test2::V0"    => "0.000121",
    "Test::Script" => "1.09"
  },
  "VERSION" => "0.05",
  "test"    => {
    "TESTS" => "t/*.t"
  }
);

my %FallbackPrereqs = (
  "Alias::Any"          => 0,
  "Archive::Libarchive" => "0.03",
  "File::chdir"         => 0,
  "Path::Tiny"          => 0,
  "Ref::Util"           => 0,
  "Test2::V0"           => "0.000121",
  "Test::Script"        => "1.09"
);

unless ( eval { ExtUtils::MakeMaker->VERSION(6.63_03) } ) {
  delete $WriteMakefileArgs{TEST_REQUIRES};
  delete $WriteMakefileArgs{BUILD_REQUIRES};
  $WriteMakefileArgs{PREREQ_PM} = \%FallbackPrereqs;
}

lib/Archive/Libarchive/Peek.pm  view on Meta::CPAN

package Archive::Libarchive::Peek;

use strict;
use warnings;
use Archive::Libarchive 0.03 qw( ARCHIVE_OK ARCHIVE_WARN ARCHIVE_EOF );
use Ref::Util qw( is_plain_coderef is_plain_arrayref is_plain_scalarref is_ref );
use Carp ();
use Path::Tiny ();
use 5.020;
use Alias::Any;
use experimental qw( signatures postderef );

# ABSTRACT: Peek into archives without extracting them
our $VERSION = '0.05'; # VERSION

t/00_diag.t  view on Meta::CPAN

my %modules;
my $post_diag;

$modules{$_} = $_ for qw(
  Alias::Any
  Archive::Libarchive
  ExtUtils::MakeMaker
  File::chdir
  Path::Tiny
  Ref::Util
  Test2::V0
  Test::Script
);



my @modules = sort keys %modules;

sub spacer ()
{