Untitled

use strict;
use warnings;
use Time::Piece;

# Timestamp à tester
my $timestamp = 1575384753;

# Date actuelle
my $now = time;

# Calculer la différence en secondes
my $diff = $now - $timestamp;

# Nombre de secondes dans 2 ans (approximativement 2 * 365.25 jours)
my $seconds_in_two_years = 2 * 365.25 * 24 * 60 * 60;

# Vérifier si la date est inférieure à 2 ans
if ($diff < $seconds_in_two_years) {
    print "La date est inférieure à 2 ans par rapport à aujourd'hui.\n";
} else {
    print "La date est plus ancienne que 2 ans par rapport à aujourd'hui.\n";
}