From d28bcb7e09769e6eaf9e4e9f0206fdc9e76a575a Mon Sep 17 00:00:00 2001 From: Florian Pritz Date: Wed, 24 Jan 2018 01:10:15 +0100 Subject: Add --list feature to search for files contained in backups by path Signed-off-by: Florian Pritz --- lib/App/BorgRestore.pm | 15 +++++++++++++++ 1 file changed, 15 insertions(+) (limited to 'lib/App/BorgRestore.pm') diff --git a/lib/App/BorgRestore.pm b/lib/App/BorgRestore.pm index 828838c..c3b37fd 100644 --- a/lib/App/BorgRestore.pm +++ b/lib/App/BorgRestore.pm @@ -402,6 +402,21 @@ method _add_path_to_hash($hash, $path, $time) { } } +=head3 search_path + + my $paths = $app->search_path($pattern) + +Returns a arrayref of paths that match the pattern. The pattern is matched as +an sqlite LIKE pattern. If no % occurs in the pattern, the patterns is +automatically wrapped between two % so it may match anywhere in the path. + +=cut + +method search_path($pattern) { + $pattern = '%'.$pattern.'%' if $pattern !~ m/%/; + return $self->{db}->search_path($pattern); +} + =head3 get_missing_items my $items = $app->get_missing_items($have, $want); -- cgit v1.2.3-24-g4f1b