diff options
Diffstat (limited to 'lib/App')
-rw-r--r-- | lib/App/BorgRestore/Borg.pm | 12 | ||||
-rw-r--r-- | lib/App/BorgRestore/DB.pm | 12 | ||||
-rw-r--r-- | lib/App/BorgRestore/Helper.pm | 12 |
3 files changed, 36 insertions, 0 deletions
diff --git a/lib/App/BorgRestore/Borg.pm b/lib/App/BorgRestore/Borg.pm index 3766f8f..24d77c8 100644 --- a/lib/App/BorgRestore/Borg.pm +++ b/lib/App/BorgRestore/Borg.pm @@ -9,6 +9,18 @@ use Function::Parameters; use IPC::Run qw(run start new_chunker); use Log::Any qw($log); +=encoding utf-8 + +=head1 NAME + +App::BorgRestore::Borg - Borg abstraction + +=head1 DESCRIPTION + +App::BorgRestore::Borg abstracts borg commands used by L<App::BorgRestore>. + +=cut + method new($class: $borg_repo) { my $self = {}; bless $self, $class; diff --git a/lib/App/BorgRestore/DB.pm b/lib/App/BorgRestore/DB.pm index b8eb0be..e918677 100644 --- a/lib/App/BorgRestore/DB.pm +++ b/lib/App/BorgRestore/DB.pm @@ -9,6 +9,18 @@ use DBI; use Function::Parameters; use Log::Any qw($log); +=encoding utf-8 + +=head1 NAME + +App::BorgRestore::DB - Database layer + +=head1 DESCRIPTION + +App::BorgRestore::DB abstracts the database storage used internally by L<App::BorgRestore>. + +=cut + method new($class: $db_path, $cache_size) { my $self = {}; bless $self, $class; diff --git a/lib/App/BorgRestore/Helper.pm b/lib/App/BorgRestore/Helper.pm index 91d3e91..a89751a 100644 --- a/lib/App/BorgRestore/Helper.pm +++ b/lib/App/BorgRestore/Helper.pm @@ -6,6 +6,18 @@ use warnings; use Function::Parameters; use POSIX (); +=encoding utf-8 + +=head1 NAME + +App::BorgRestore::Helper - Helper functions + +=head1 DESCRIPTION + +App::BorgRestore::Helper provides some general helper functions used in various packages in the L<App::BorgRestore> namespace. + +=cut + fun untaint($data, $regex) { $data =~ m/^($regex)$/ or die "Failed to untaint: $data"; return $1; |