$ perl -MDateTime -E 'say DateTime->from_epoch(epoch => time + $_ * 86400, locale => "fr")->day_name for (0..6)' jeudi vendredi samedi dimanche lundi mardi mercredi