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