summaryrefslogtreecommitdiff
path: root/metadata/scripts/expiration_date.pl
diff options
context:
space:
mode:
authorBjörn Mattsson <bjorn@sunet.se>2023-11-06 15:12:20 +0100
committerBjörn Mattsson <bjorn@sunet.se>2023-11-06 15:12:20 +0100
commita9fa6d5551f047e976e624c1b6cc82e8c4fbb76d (patch)
treef8c0f59a36ae572e3f67045435b27e15bf9d0b44 /metadata/scripts/expiration_date.pl
parentb4f5e684ecb318e10735414c683787d435bae7a5 (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-xmetadata/scripts/expiration_date.pl11
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;
-