App-mvr

 view release on metacpan or  search on metacpan

Build.PL  view on Meta::CPAN

  "module_name" => "App::mvr",
  "recommends" => {},
  "recursive_test_files" => 1,
  "requires" => {
    "Carp" => 0,
    "Exporter" => 0,
    "Getopt::Long" => 0,
    "POSIX" => 0,
    "Path::Tiny" => "0.034",
    "Pod::Usage" => 0,
    "Try::Tiny" => 0,
    "perl" => "v5.14.0",
    "strict" => 0,
    "warnings" => 0
  },
  "script_files" => [
    "bin/mvr"
  ],
  "test_requires" => {
    "Capture::Tiny" => 0,
    "File::Spec" => 0,

META.json  view on Meta::CPAN

         }
      },
      "runtime" : {
         "requires" : {
            "Carp" : "0",
            "Exporter" : "0",
            "Getopt::Long" : "0",
            "POSIX" : "0",
            "Path::Tiny" : "0.034",
            "Pod::Usage" : "0",
            "Try::Tiny" : "0",
            "perl" : "v5.14.0",
            "strict" : "0",
            "warnings" : "0"
         }
      },
      "test" : {
         "requires" : {
            "Capture::Tiny" : "0",
            "File::Spec" : "0",
            "IO::Handle" : "0",

META.yml  view on Meta::CPAN

    - corpus
    - inc
    - examples
requires:
  Carp: 0
  Exporter: 0
  Getopt::Long: 0
  POSIX: 0
  Path::Tiny: 0.034
  Pod::Usage: 0
  Try::Tiny: 0
  perl: v5.14.0
  strict: 0
  warnings: 0
resources:
  bugtracker: https://github.com/doherty/App-mvr/issues
  homepage: http://metacpan.org/release/App-mvr/
  repository: git://github.com/doherty/App-mvr.git
version: 0.005

Makefile.PL  view on Meta::CPAN

  ],
  "LICENSE" => "perl",
  "NAME" => "App::mvr",
  "PREREQ_PM" => {
    "Carp" => 0,
    "Exporter" => 0,
    "Getopt::Long" => 0,
    "POSIX" => 0,
    "Path::Tiny" => "0.034",
    "Pod::Usage" => 0,
    "Try::Tiny" => 0,
    "strict" => 0,
    "warnings" => 0
  },
  "TEST_REQUIRES" => {
    "Capture::Tiny" => 0,
    "File::Spec" => 0,
    "IO::Handle" => 0,
    "IPC::Open3" => 0,
    "IPC::Run3" => 0,
    "Test::Fatal" => 0,

Makefile.PL  view on Meta::CPAN

  "IPC::Open3" => 0,
  "IPC::Run3" => 0,
  "Module::Build" => "0.3601",
  "POSIX" => 0,
  "Path::Tiny" => "0.034",
  "Pod::Usage" => 0,
  "Test::Fatal" => 0,
  "Test::Is" => 0,
  "Test::More" => 0,
  "Test::Script::Run" => 0,
  "Try::Tiny" => 0,
  "strict" => 0,
  "warnings" => 0
);


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

lib/App/mvr.pm  view on Meta::CPAN

use v5.14.0;
use strict;
use warnings;
# ABSTRACT: like mv, but clever
our $VERSION = '0.005'; # VERSION

use Exporter qw(import);
our @EXPORT = qw(mvr);

use Path::Tiny 0.034;
use Try::Tiny;
use Carp;

our $VERBOSE = 0;


my $duplicates = sub {
    my $A = shift;
    my $B = shift;
    return if $A->stat->size != $B->stat->size; # avoid reading file off disk