Discussion :

[maloute80]

Bonjour,

Comment Importer mes valeur de mon fichier Script.conf dans mon Script.pl?

Script.pl

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
$sybase = DBI->connect('dbi:Sybase:script_conf{name_sybase_server}','$script_conf{user_sybase_server}','$script_conf{password_sybase_server}')

Script.conf

name_sybase_server:zzz
user_sybase_server:yyy
password_sybase_server:iii

Merci à vous.

[Arioch]

Bonjour,

Comment Importer mes valeur de mon fichier Script.conf dans mon Script.pl?

Script.pl

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
$sybase = DBI->connect('dbi:Sybase:script_conf{name_sybase_server}','$script_conf{user_sybase_server}','$script_conf{password_sybase_server}')

Script.conf


Merci à vous.

Et bien c'est fort simple : au début de ton script.pl, tu lis le fichier script.conf, tu en récupères les lignes et les affecte à différentes variables. Ensuite, tu t'assures que tu as bien récupéré toutes les variables obligatoires pour la suite du déroulement de ton script et voilà.

Rien de bien compliqué

[maloute80]

Rien de bien compliqué

Pour un programmeur perl moi étant débutant quelque notion en C.
Peut tu me donner un exemple stp par rapport aux lignes que j'ai mit plus haut ou un lien qui le montre un exemple.
Si tu ne veut pas je te remerci tout de même pour ta réponse

[Arioch]

Pour un programmeur perl moi étant débutant quelque notion en C.
Peut tu me donner un exemple stp par rapport aux lignes que j'ai mit plus haut ou un lien qui le montre un exemple.
Si tu ne veut pas je te remerci tout de même pour ta réponse

Le problème que tu demandes est, soyons franc, un problème fort simple en Perl : comment lire un fichier et en récupérer son contenu.

Sur cette page, tu trouveras pas mal de doc en français sur Perl : http://perl.enstimac.fr/DocFr.html mais ici même, il y a bon nombre de tutoriaux !

Faire du Perl (comme tout autre langage) passe aussi par une phase d'apprentissage et de lecture. Voire pour certains, des exercices (je parle en connaissance de cause).

Pour répondre à ta question, voici un petit exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
# contenu du fichier toto.conf (ligne 1 = user, 2 = password)
toto
tititututata
 
 
# un script qui lit ce fichier et affecte les valeurs à 2 variables différentes
use strict;
use warnings;
 
my $user;
my $pwd;
 
open(CONF, "toto.conf") or die ("err de lecture du fichier .conf : $!\n");
@_ = <CONF>;
close(CONF);
 
chomp(@_);
 
($user, $pwd) = ($_[0], $_[1]);
 
print "données lues du fichier .conf :\n";
print "utilisateur : $user\n";
print "mot de passe : $pwd\n";

Mais avant de prendre ce code et l'adapter simplement pour tes besoins, le comprend-tu déjà ? N'hésite pas à poser des questions

[Arioch]

Autre exemple plus approprié à tes besoins (désolé, j'avais mal lu comment était organisé ton fichier conf) :

contenu du fichier toto.conf :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
name_sybase_server:zzz
user_sybase_server:yyy
password_sybase_server:iii

script pour récupérer son contenu :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
use strict;
use warnings;
 
my %conf;
 
open(CONF, "toto.conf") or die ("err de lecture du fichier .conf : $!\n");
while(<CONF>)
{
    chomp();
    @_ = split(/:/, $_);
    $conf{$_[0]} = $_[1];
}
close(CONF);
 
print "données lues du fichier .conf :\n";
foreach(keys %conf)
{
    print "$_ = $conf{$_}\n";
}

Voilà qui est mieux

[maloute80]

Je ne comprend pas comment ca récupéré les champs suivants en gras? dans quel variables?

name_sybase_server:zzz
user_sybase_server:yyy
password_sybase_server:iii

car je doit en extraire juste ces champs pas la description avant les ":" pour les insérés dans ma connexion

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
my $sybase = DBI->connect("dbi:Sybase$conf{$_[0]}","$conf{$_[1]}","$conf{$_[2]}")

ceci est le code qui n'est évidament pas valable mais juste la pour faire comprendre ce que je souhaite

Merci pour ton courage et ta patiente.