Automatisation de lien de fichier / perl
Résolu
VivoBaggio
Messages postés
140
Date d'inscription
Statut
Membre
Dernière intervention
-
lami20j Messages postés 21331 Date d'inscription Statut Modérateur, Contributeur sécurité Dernière intervention -
lami20j Messages postés 21331 Date d'inscription Statut Modérateur, Contributeur sécurité Dernière intervention -
Bonjour,
Voilà, toujours sur mon code depuis une semaine. La problématique que je viens de rencontrer n'en est pas vraiment une. Il s'agit juste d'automatiser le programme. A l'heure actuelle, les liens sont écrits en dur, que ce soit le fichier excel ou csv.
Ce que je voudrais, ça serait que la personne saisisse le nom du fichier, et à partir de là, les fichiers sont crées. Mon problème se trouve sur l'extension.
Je vous mets mon code :
use strict;
use warnings;
use Spreadsheet::ParseExcel;
# Saisie du nom du fichier de sortie
print "Saisissez le mois et l'année de l'opération ainsi que l'extension (mmyy.xxx) ! ";
my $num_ope=<stdin>;
print "Vous avez saisi : $num_ope\n";
open FILECSV,">>C:\\produits_SU".$num_ope; "Je n'arrive pas à mettre l'extension ".csv" en dur, sachant $num_ope
comprends par exemple 1107"
my $file = "C:\\produits_SU1107.xls";
Merci d'avance de votre aide.
Voilà, toujours sur mon code depuis une semaine. La problématique que je viens de rencontrer n'en est pas vraiment une. Il s'agit juste d'automatiser le programme. A l'heure actuelle, les liens sont écrits en dur, que ce soit le fichier excel ou csv.
Ce que je voudrais, ça serait que la personne saisisse le nom du fichier, et à partir de là, les fichiers sont crées. Mon problème se trouve sur l'extension.
Je vous mets mon code :
use strict;
use warnings;
use Spreadsheet::ParseExcel;
# Saisie du nom du fichier de sortie
print "Saisissez le mois et l'année de l'opération ainsi que l'extension (mmyy.xxx) ! ";
my $num_ope=<stdin>;
print "Vous avez saisi : $num_ope\n";
open FILECSV,">>C:\\produits_SU".$num_ope; "Je n'arrive pas à mettre l'extension ".csv" en dur, sachant $num_ope
comprends par exemple 1107"
my $file = "C:\\produits_SU1107.xls";
Merci d'avance de votre aide.
A voir également:
- Automatisation de lien de fichier / perl
- Fichier bin - Guide
- Fichier epub - Guide
- Fichier rar - Guide
- Lien url - Guide
- Comment réduire la taille d'un fichier - Guide
4 réponses
Salut,
je ne comprends pas.
pas besoin d'écrire tout
dit ce que tu veux saisir et ce que tu veux obtenir comme résultat
je ne comprends pas.
pas besoin d'écrire tout
dit ce que tu veux saisir et ce que tu veux obtenir comme résultat