Jan Seidl
and 1 contributors

NAME

File::Copy::Recursive::Verify - data-safe recursive copy

SYNOPSIS

    use File::Copy::Recursive::Verify qw(verify_rcopy);

    verify_rcopy($dir_a, $dir_b);

    #OOP equivalent

    File::Copy::Recursive::Verify->new(
        src_dir => $dir_a,
        dst_dir => $dir_b,
    )->copy();

    #some complex copy - I know SHA-256 hash of subdir/a.dat file
    #tree $dir_a:
    #.
    #├── c.dat
    #└── subdir
    #    ├── a.dat
    #    └── b.dat

    verify_rcopy($dir_a, $dir_b, {tries => 3, hash_algo => 'SHA-256', src_hash => {'subdir/a.dat' => '0'x64}});

    #OOP equivalent

    File::Copy::Recursive::Verify->new(
        src_dir => $dir_a,
        dst_dir => $dir_b,
        tries   => 3,
        hash_algo => 'SHA-256',
        src_hash => {'subdir/a.dat' => 0x64},
    )->copy();

DESCRIPTION

Use File::Copy::Verify for recursive copy.

FUNCTIONS

verify_rcopy($src_dir, $dst_dir, $options)

functional api

Recusive copy of dir_a to dir_b.

Retry mechanism is via Try::Tiny::Retry (Each file will try verify_copy 10 times with exponential backoff in default).

As verification digest are use fastest MD5 in default.

$options is HashRef of attributes.

return HashRef of copied files (key source, value destination)

rcopy

alias of verify_rcopy

METHODS

new(%attributes)

%attributes

src_dir

source dir

src_hash

source HashRef of path -> hash

dst_dir

destination dir

dst_hash

destination HashRef of path -> hash

hash_algo

hash algorithm

default MD5

tries

number of tries

more about retry - Try::Tiny::Retry

copy;

start recursive copy

return HashRef of copied files (key source, value destination)

LICENSE

Copyright (C) Avast Software.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHOR

Jan Seidl <seidl@avast.com>