Skip to content

Instantly share code, notes, and snippets.

View michalkotas's full-sized avatar

Michał Kotas michalkotas

View GitHub Profile
@michalkotas
michalkotas / vzdump-hook-script.pl
Created July 11, 2017 13:18
Perl script that uploads backup files to cloud storage using rclone, removes backups older then 1 week.
#!/usr/bin/perl -w
# example hook script for vzdump (--script option)
use strict;
print "HOOK: " . join (' ', @ARGV) . "\n";
my $phase = shift;