|
@@ -80,7 +80,7 @@ switch ($nummois) {
|
|
|
say "Quel est le lien de la réunion précédente ?";
|
|
|
my $padprecedent= <> ; chomp $padprecedent;
|
|
|
|
|
|
-my $filename = $pad_dir."pad.test.md";
|
|
|
+my $filename = $pad_dir."pad-suivi.md";
|
|
|
my $fh;
|
|
|
open ($fh, '>', $filename) or die "Impossible d'ouvrir le fichier $filename en écriture";
|
|
|
say $fh "Le lien du pad sera https://pad.ilico.org/p/ffdn-$annee$nummois$jour";
|