diff options
author | Björn Mattsson <bjorn@sunet.se> | 2023-11-06 15:12:20 +0100 |
---|---|---|
committer | Björn Mattsson <bjorn@sunet.se> | 2023-11-06 15:12:20 +0100 |
commit | a9fa6d5551f047e976e624c1b6cc82e8c4fbb76d (patch) | |
tree | f8c0f59a36ae572e3f67045435b27e15bf9d0b44 /metadata/scripts/expiration_date.pl | |
parent | b4f5e684ecb318e10735414c683787d435bae7a5 (diff) |
Cleaning up old files left after we stopped signing on mds1/2. Done by Bjorn and Jocarmd-2023-11-06-v02
Diffstat (limited to 'metadata/scripts/expiration_date.pl')
-rwxr-xr-x | metadata/scripts/expiration_date.pl | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/metadata/scripts/expiration_date.pl b/metadata/scripts/expiration_date.pl deleted file mode 100755 index cf297c5f..00000000 --- a/metadata/scripts/expiration_date.pl +++ /dev/null @@ -1,11 +0,0 @@ -#!/usr/bin/env perl - -use Date::Calc qw/Today_and_Now Add_Delta_Days/; -my $delta = $ARGV[0]; -$delta = 30 unless $delta; - -($year,$month,$day,$hour,$min,$sec) = Today_and_Now(); -($year,$month,$day) = Add_Delta_Days($year,$month,$day,$delta); -my $date = sprintf "%s-%02d-%02dT%02d:%02d:%02dZ",$year,$month,$day,$hour,$min,$sec; -print $date; - |