Problème pour rendre fichier perl exécutable

Version imprimable

20/12/2011, 11h54
bforzeus

Problème pour rendre fichier perl exécutable

Bonjour Tout le monde

je viens de lire le tutoriels Perl de djibril sur la création de fichier exécutable dans tout les sens mai sans grand sucé :cry: j'ai essayé presque tout le méthode avec a chaque fois des d'erreur

Perl2Exe: je trouve le même message erreur que dans l'article c'est a dire Warning: Can't locate Encode/ConfigLocal.pm

PerlApp: j'arrive a crée un fichier .exe mai dés que je lui change de dossier il ne fonctionne plus

Module PAR: j'ai le message d'erreur (('pp' n'est pas reconnu en tant que commande interne))

pourriez vous me dire comment je peut contourner ses problème?
merci d'avance
20/12/2011, 12h21
djibril

Bonjour,

Il faudrait nous dire exactement ce que vous avez fait, quel type de programme voulez-vous rendre exécutable, sous quel OS et quels sont les messages d'erreurs. et si possible, nous montrer le programme.

:merci:

Re
Offet j'ai fais un programme Perl/Tk sous windows et activePerl5.12.4, il prend un fichier et le transforme en un autre fichier en sortie.
les message d'erreur sont différent selon la méthode que j'ai essayé de faire:
perl2exe Warning: Can't locate Encode/ConfigLocal.pm
Module PAR 'pp' n'est pas reconnu en tant que commande interne
PerlApp j'arrive a crée un fichier .exe mai dés que je lui change de dossier il ne fonctionne plus

voici le programme :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
#! /usr/bin/perl
use Tk;
use Tk::FileSelect;
use Tk::ColorEditor;
use Tk::Photo;
use Tk::JPEG;
use POSIX qw(strftime);
use XML::Simple;
 
$date = strftime "%c", localtime;
####################### DEBUT PROGRAMME 
my $main = MainWindow->new();
$main->minsize(qw(250 250));
$main->title("Projet _");
my ($choix);
$main->Label(-text => "Quelle traitement voulez vous realiser")->pack;
$main->Radiobutton(-text => "Pour Demande _",
		   -variable =>\$choix,
		   -value => "DEMANDE_()",
		   )->pack(-anchor =>'w');
$main->Radiobutton(-text => "Pour Repense _",
		   -variable =>\$choix,
		   -value => "REPENSE_()",
		   )->pack(-anchor =>'w');
$main->Radiobutton(-text => "Pour QUITTER",
		   -variable =>\$choix,
		   -value => "QUITTER",
		   )->pack(-anchor =>'w');
$main->Button 	(-text => "Choix", -command =>
		sub {
		     if ($choix eq "DEMANDE_()") DEMANDE();}
		     if ($choix eq "REPENSE_()") REPENSE();}
		     if ($choix eq "QUITTER") {exit;}	
		 },)->pack;
$main->configure(-background=>'red' );
MainLoop();
 
##########################################
sub DEMANDE{
my $DEMANDE = MainWindow->new();
.....
$DEMANDE->configure(-background=>'cyan');
 
MainLoop();
}
#######################################
sub REPENSE{
my $REPENSE = MainWindow->new();
$REPENSE->minsize(qw(500 500));
$REPENSE->title("Pour Format fichier Repense _");
......
$REPENSE->configure(-background=>'cyan');
MainLoop();
}

20/12/2011, 13h49
djibril

Avez-vous installé le module PAR::Packer ?
20/12/2011, 18h31
bforzeus

Oui, j'ai bien installé le modul PAR::Packer , avec la commande
- ppm install PAR::Packer,
20/12/2011, 19h06
djibril

Quelle est ta version de Perl perl -v ?
20/12/2011, 22h54
bforzeus

je t'informe demain matin, vue que je suis pas sur la même machine,
merci de ton aide
21/12/2011, 09h39
bforzeus

Citation:

Envoyé par djibril

Quelle est ta version de Perl perl -v ?

Bonjour Djibril
j'ai la version 5.12.4 de Perl
21/12/2011, 09h50
djibril

Peux-tu faire un ppm, l'interface graphique va s'ouvrir. Tu tapes PAR dans le champ de recherche, puis tu fais une capture d'écran et me le montre.

:merci:
21/12/2011, 10h55
bforzeus

1 pièce(s) jointe(s)

ci dessous l'image

http://www.developpez.net/forums/att...1&d=1324461167

apparament l'installation de PAR::Packer ne sais pas bien effectué, je vais recomancé les etape. en revenche tu pourrai me dire comment faire pour installé GCC aprés l'avoir téléchargé et dézzipé
Merci d'avance

fais ceci :

Code:

1
2
3
4
ppm install MinGW
ppm install CPAN
cpan
cpan>install PAR::Packer

Lance ce programme :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
#!/usr/bin/perl
#===============================================================================
# Author : djibril
# Date   : 10/07/2011 11:27:01
# Main   : Installation du module PAR::Packer et ses dépendances
#===============================================================================
use Carp;
use strict;
use CPAN;
use English '-no_match_vars';    # Importer des variables prédéfinies
use ExtUtils::Installed;
 
my @modules_a_installer_ppm
  = ( 'Term-ANSIColor', 'Module-ScanDeps', 'PAR-Dist', 'PAR', 'Getopt-ArgvFile', 'Parse-Binary' );
 
print "=====\nOS : $OSNAME\n=====\n\n";
 
# Windows System
if ( $OSNAME eq 'MSWin32' ) {
  push @modules_a_installer_ppm, 'Win32-Exe';
  push @modules_a_installer_ppm, 'Win32-Process';
  unshift @modules_a_installer_ppm, 'Win32-Console-ANSI';
  unshift @modules_a_installer_ppm, 'MinGW';
 
  # Installation de modules via ppm
  foreach my $module (@modules_a_installer_ppm) {
    print "\n\n[ppm install $module]\n\n";
    system "ppm install $module";
  }
  @modules_a_installer_ppm = ('PAR::Packer');
}
else {
 
  # Other OS : MAC OS, Linux...
  foreach (@modules_a_installer_ppm) { s{-}{::}g; }
  push @modules_a_installer_ppm, 'PAR::Packer';
}
 
# Installation de modules via CPAN
print "install CPAN and reload cpan\n\n";
CPAN::Shell->install('CPAN');    # Mise à jour du cpan
CPAN::Index->reload;
foreach my $module (@modules_a_installer_ppm) {
  print "- Installation de $module\n";
  CPAN::Shell->install($module);
}
 
__END__

21/12/2011, 11h46
bforzeus

2 pièce(s) jointe(s)

Re, Désolé Djibril

j'ai fait une petite erreur en copiant ton script, donc le message d'erreur c'etait pas le bon, j'ai plutôt un autre message d'erreur
offet quand je lance le script j''ai la premier image qui m'indique les module qui sont déjà installé
Pièce jointe 86845

et puis a la fin du déroulement de se script j'ai cette fenêtre
Pièce jointe 86847

tu saurai pas c'est quoi le problème exactement et est ce qu'il me manque des module ?
merci encors
21/12/2011, 14h49
djibril

Peux-tu faire un perl -V avec "v" en majuscule. J'ai l'impression que tu as installé perl dans "program files", ce qui est très très mal.
21/12/2011, 15h00
bforzeus

1 pièce(s) jointe(s)

ton impression est juste, j'ai bien installé Perl en Programme files, et voila ce que donne Perl -V
Pièce jointe 86854
peut tu me dire en quoi c'est mal d'installé Perl en Programme files et quelle alternative s'offre a moi? dois je réinstallé Perl ?
21/12/2011, 15h03
djibril
Il faut absolument désinstaller Perl et le réinstaller. Tu dois laisser le répertoire d'installation par défaut, c'est-à-dire C:\Perl.

Donc :
1. désinstalle Perl ;
2. supprime le répertoire C:\Program Files\Perl ;
3. supprime de la variable d'environnement e chemin ;
4. redémarre ton PC ;
5. réinstalle Perl ;
6. redémarre ton PC ;
7. lance le script que je t'ai filé plus haut.
21/12/2011, 15h29
bforzeus

merci pour tes explication, je vais le désinstallé,
comment faire pour supprime de la variable d'environnement ce chemin?
quelle version de perl me conseil tu ?

et merci bcp
21/12/2011, 15h36
djibril

Après avoir désinstallé perl, clique droit sur poste de travail -> propriété -> onglet avancé -> clic sur variable d'environnement.
Dans les variables systèmes, tu as une variable PATH, tu cherches le chemin pointant vers perl et le supprime.
Pour la version de Perl, tu peux prendre ActivePerl 5.14.2, c'est la dernière.
21/12/2011, 16h54
bforzeus

Merci Bcp Djibril,

j'ai réinstallé PERL comme tu me la dis et avec ton script ,j'ai réussi à crée un fichier exécutable.
en revanche dés que je copier le fichier (.exe) et je lui change de chemin le fichier (.exe) ne marche plus !!!! :cry:
est ce que c'est normale? ou c'est moi qui est mal fais les chose encore ?
coment je peut faire pour que le fichier (.exe) fonctionne même quand je lui chang de chemin et même quand je le met sur une machine ou il y a pas perl?

et merci pour ton aide

Qu'elle est la commande que tu as utilisée pour créer l'exécutable ?
Que veut dire ne fonctionne plus, c'est peut être dû au contenu de ton programme ?
As-tu essayé de mettre en exécutable un simple programme comme celui-ci par exemple :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
#!/usr/bin/perl
use warnings;
use strict;
use Tk;    # Appel du module Tk
 
# Programme principal
# Création de la fenêtre
my $fenetre = new MainWindow(
  -title      => 'Première fenêtre Tk',
  -background => 'white',
);
 
# Taille minimale de ma fenêtre
$fenetre->minsize( 300, 100 );
 
my $message_accueil = "Bonjour tout le monde\n\nWelcome dans le monde magnifique de Perl/Tk\n\n";
 
# Affichage d'un texte
my $label_accueil = $fenetre->Label(
  -text       => $message_accueil,
  -background => 'white',
)->pack();
 
# Affichage d'un bouton pour fermer la fenêtre
my $bouton = $fenetre->Button(
  -text    => 'Ferme la fenêtre',
  -command => sub { exit; },
)->pack();
 
MainLoop;    # Obligatoire

21/12/2011, 18h06
bforzeus

pour ton code il fonctionne parfaitement,
la commande utilisé c'est pp -o test.exe test.pl -v
en revenche le mien quand je crée le fichier (.exe) il marche sur le chemin de création par contre il ne fonctionne plus si je lui change de chemin, je suis entraine de creusé un peut cela et je vous tiens au courant de la suite.

merci de votre aide djibril
22/12/2011, 11h52
bforzeus
Bonjour

Finalement j'ai trouvé ce qui cloché; offet j’utilise pas
Code:

1 2 use warnings; use strict;
en plus de cela je déclarais pas mes variable avant de les utilisé, cela ne m’affichai aucune erreur sauf que ça a un effet sur l’exécutable par la suite.

Encore merci pour tous les cours et tutoriels pour apprendre le langage Perl : http://perl.developpez.com/cours/
22/12/2011, 11h58
djibril

Au moins la prochaine fois, tu prendras les bonnes habitudes :aie:.