diff options
| author | Florian Pritz <bluewind@xinu.at> | 2017-04-02 21:35:57 +0200 |
|---|---|---|
| committer | Florian Pritz <bluewind@xinu.at> | 2017-04-02 22:31:49 +0200 |
| commit | 0d24899b78307e33d72a693d33178343069187dd (patch) | |
| tree | 7d595561cade0f4f8557edf12a754cb23ddf2932 /lib/App/BorgRestore | |
| parent | 9b9bf92e5f83102742036aa98a4c6c73f758c302 (diff) | |
| download | App-BorgRestore-0d24899b78307e33d72a693d33178343069187dd.tar.gz App-BorgRestore-0d24899b78307e33d72a693d33178343069187dd.tar.xz | |
Move format_timestamp to Helper
Signed-off-by: Florian Pritz <bluewind@xinu.at>
Diffstat (limited to 'lib/App/BorgRestore')
| -rw-r--r-- | lib/App/BorgRestore/Helper.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/App/BorgRestore/Helper.pm b/lib/App/BorgRestore/Helper.pm index 8403ec3..8bc4ceb 100644 --- a/lib/App/BorgRestore/Helper.pm +++ b/lib/App/BorgRestore/Helper.pm @@ -3,6 +3,7 @@ use v5.10; use strict; use warnings; +use POSIX (); sub untaint { my $data = shift; @@ -17,6 +18,12 @@ sub untaint_archive_name { return untaint($archive, qr([a-zA-Z0-9-:+\.]+)); } +sub format_timestamp { + my $timestamp = shift; + + return POSIX::strftime "%a. %F %H:%M:%S %z", localtime $timestamp; +} + 1; __END__ |