Perl-Stripper

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "experimental" : "0",
            "perl" : "5.010001"
         }
      },
      "test" : {
         "requires" : {
            "File::Slurper" : "0",
            "File::Spec" : "0",
            "IO::Handle" : "0",
            "IPC::Open3" : "0",
            "Test::Differences" : "0",
            "Test::More" : "0.98",
            "strict" : "0",
            "vars" : "0",
            "warnings" : "0"
         }
      }
   },
   "release_status" : "stable",
   "resources" : {
      "bugtracker" : {

META.yml  view on Meta::CPAN

---
abstract: 'Yet another PPI-based Perl source code stripper'
author:
  - 'perlancar <perlancar@cpan.org>'
build_requires:
  File::Slurper: '0'
  File::Spec: '0'
  IO::Handle: '0'
  IPC::Open3: '0'
  Test::Differences: '0'
  Test::More: '0.98'
  strict: '0'
  vars: '0'
  warnings: '0'
configure_requires:
  ExtUtils::MakeMaker: '0'
dynamic_config: 0
generated_by: 'Dist::Zilla version 6.009, CPAN::Meta::Converter version 2.150010'
license: perl
meta-spec:

Makefile.PL  view on Meta::CPAN

    "Log::ger" => "0.011",
    "Moo" => 0,
    "PPI" => 0,
    "experimental" => 0
  },
  "TEST_REQUIRES" => {
    "File::Slurper" => 0,
    "File::Spec" => 0,
    "IO::Handle" => 0,
    "IPC::Open3" => 0,
    "Test::Differences" => 0,
    "Test::More" => "0.98",
    "strict" => 0,
    "vars" => 0,
    "warnings" => 0
  },
  "VERSION" => "0.10",
  "test" => {
    "TESTS" => "t/*.t"
  }
);


my %FallbackPrereqs = (
  "File::Slurper" => 0,
  "File::Spec" => 0,
  "IO::Handle" => 0,
  "IPC::Open3" => 0,
  "Log::ger" => "0.011",
  "Moo" => 0,
  "PPI" => 0,
  "Test::Differences" => 0,
  "Test::More" => "0.98",
  "experimental" => 0,
  "strict" => 0,
  "vars" => 0,
  "warnings" => 0
);


unless ( eval { ExtUtils::MakeMaker->VERSION(6.63_03) } ) {
  delete $WriteMakefileArgs{TEST_REQUIRES};

dist.ini  view on Meta::CPAN

name    = Perl-Stripper

[@Author::PERLANCAR]
:version=0.58

[Prereqs / TestRequires]
strict=0
vars=0
warnings=0
File::Slurper=0
Test::Differences=0
Test::More=0.98

[Prereqs]
perl=5.010001
experimental=0
Log::ger=0.011
Moo=0
PPI=0

[Extras / lint_prereqs / assume-provided]

t/01-basics.t  view on Meta::CPAN

#!/usr/bin/perl

use 5.010;
use strict;
use warnings;

use File::Slurper qw(read_text);
use Perl::Stripper;
use Test::Differences;
use Test::More 0.98;

my $stripper;

$stripper = Perl::Stripper->new;
eq_or_diff($stripper->strip(read_text("t/data/1.pl")),
           read_text("t/data/1.pl-stripped-default"),
           "default");

$stripper = Perl::Stripper->new(strip_log=>1);