diff options
| author | Florian Pritz <bluewind@xinu.at> | 2019-09-28 14:55:44 +0200 |
|---|---|---|
| committer | Florian Pritz <bluewind@xinu.at> | 2019-09-28 15:25:57 +0200 |
| commit | de053014116837eba145350cb0aa97524d745d1f (patch) | |
| tree | 5739af26b87855c69102aed3d4c802640c728aa9 /lib/App/BorgRestore/Borg.pm | |
| parent | 6d92a2b4a449674f515cd7391c95e2c94e25cfba (diff) | |
| download | App-BorgRestore-de053014116837eba145350cb0aa97524d745d1f.tar.gz App-BorgRestore-de053014116837eba145350cb0aa97524d745d1f.tar.xz | |
Import untaint function where used
Better code readability than with the full name.
Signed-off-by: Florian Pritz <bluewind@xinu.at>
Diffstat (limited to 'lib/App/BorgRestore/Borg.pm')
| -rw-r--r-- | lib/App/BorgRestore/Borg.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/App/BorgRestore/Borg.pm b/lib/App/BorgRestore/Borg.pm index 24c0608..04ad89c 100644 --- a/lib/App/BorgRestore/Borg.pm +++ b/lib/App/BorgRestore/Borg.pm @@ -2,7 +2,7 @@ package App::BorgRestore::Borg; use v5.14; use strictures 2; -use App::BorgRestore::Helper; +use App::BorgRestore::Helper qw(untaint); use autodie; use Date::Parse; @@ -116,7 +116,7 @@ method borg_list_time() { method restore($components_to_strip, $archive_name, $path) { $log->debugf("Restoring '%s' from archive %s, stripping %d components of the path", $path, $archive_name, $components_to_strip); - $archive_name = App::BorgRestore::Helper::untaint($archive_name, qr(.*)); + $archive_name = untaint($archive_name, qr(.*)); system(qw(borg extract -v --strip-components), $components_to_strip, $self->{borg_repo}."::".$archive_name, $path); } |