Forum Programmation.perl Problème avec exec() en Perl/Gtk

Posté par  (site web personnel) .
Étiquettes : aucune
0
8
sept.
2005
Bonjour :)

Voilà : j'adore le système des Alias sous bash. Le problème c'est que lorsque je tape un alias, qui va lui-même lancer un ou plusieurs programmes, la console est inutilisable tant que l'application lancée n'est pas fermée.

Il est possible d'intégrer le lanceur de programme (Alt+F2) dans ma barre d'outils (je suis sous xfce mais je crois qu'on peut faire pareil sous gnome ou kde), malheuresement ce lanceur de programme ne gère pas les alias (ce qui est (…)

Forum Programmation.perl Regexps sans accents ?

Posté par  (site web personnel) .
Étiquettes : aucune
0
12
sept.
2005
Bonjour,

J'ai une petite question concernant les regexps. Le contexte est simple : j'essaie d'écrire un petit script qui "surligne" les occurences de mots recherchés dans un résultat de recherche.

Le problème est que le moteur de recherche en amont ne fait pas la distinction au niveau des accents. Si vous recherchez "meme", il trouvera indistinctement "meme", "même" ou "mémé".

Je me demandais donc s'il y avait moyen de faire ça facilement en Perl, ou de trouver un module qui (…)

Forum Programmation.perl Gtk::Image

Posté par  .
Étiquettes : aucune
0
8
sept.
2005
Je utilise le module de Gtk2 de perl sous linux ( mandrake 10 ) .

Je souhaite créer un graphique histogramme ou camembert, je pense qu'il faut utiliser Gtk::Image mais je n'ai trouvé aucune documentation sur ce module.

J'ai besoin de tracer une ligne, un rectangle plein et une ellipse


Merci de votre aide

Forum Programmation.perl calcul de la taille d'un répertoire

Posté par  .
Étiquettes : aucune
0
22
août
2005
Bonjour,

Je voudrais savoir s'il existait un moyen d'obtenir la taille d'un répertoire. Pour avoir la taille d'un fichier particulier, j'utilise la fonction perl "stat". Je trouve assez fastidieux d'utiliser cette fonction dans une boucle pour calculer la taille d'un ensemble de fichiers...

J'ai pensé faire par exemple :

system('du -s /home/monrep');

mais le résultat du "du" me rend la taille suivi du répertoire en question... je désire avoir seulement un résultat numérique...

Auriez vous une meilleur solution? Merci pour (…)

Forum Programmation.perl données provenant d'une mdb access

Posté par  .
Étiquettes :
0
24
août
2005
Bonjour à tous,

j'ai besoin de récupérer des données d'une base de donnée Access pour les transformer et les injecter dans une db mysql.
J'arrive à connecter les db sans problèmes mais les données récupérées sont dans un format posant des problèmes sous ubuntu (les accents ressemblent à des losanges).

Je précise que tous mes softs et mon bash utilise les caractères accentués sans problèmes.
Ma locale est en UTF-8.
J'ai essayé de changer la locale (en iso8859 pour le (…)

Forum Programmation.perl code perl remplacement automatique dans un fichier texte

Posté par  .
Étiquettes : aucune
0
23
août
2005
Je voudrais réaliser à l'aide d'un script perl les actions suivantes:

1)renommer une chaine de caractères (en fait intercaller :
- dans un fichier texte, rechercher une séquence générique seq1
- regarder si la longueur de la sequence qui suit (mot suivant) est supérieure à 1
- si oui, alors intercaller un "_" entre chaque lettre
- le répéter jusqu'à la fin du fichier pour chaque paragraphe

2) modifier une valeur dans un fichier:
rechercher toutes les lignes commençant par (…)

Forum Programmation.perl Switch en perl 5.8 qui veut pas compiler

Posté par  .
Étiquettes : aucune
0
9
août
2005
Quelqu'un pourrait me dire pourquoi ce gros naze de perl 5.8 (testé avec ActivePerl 5.8.7 build813 sous Windows 2000 et perl 5.8.1 sous Mac OS X), refuse de compiler ce pauvre script :


use Switch;

my $maxreq = 2147483646;

&check_updates(1);

sub check_limit
{
my $sz = int($maxreq / 1024);

return "(< $sz Kb)" if $sz < 1024;

# Seems to trigger the error
$sz = int($maxreq / (1024 * 10.24)) / 100;

return "(< $sz Mb)" if $sz < 1024;
(…)

Forum Programmation.perl padb2csv

Posté par  (site web personnel) .
Étiquettes : aucune
0
11
août
2005
Ce post fait suite à http://linuxfr.org/forums/12/10604.html(...)

J'avais demandé comment convertir un fichier Palm vers autre chose et Ellendhel (http://linuxfr.org/~Ellendhel/)(...) m'avais proposé ce script http://www.cpan.org/authors/id/A/AK/AKOLB/padb2csv(...)

En essayant, j'ai pas mal de problèmes ... d'accents (ou plutôt de caractères spéciaux) mais je ne suis pas sur. J'ai une chi** de parse() failed du style :


parse() failed on argument: * Luis 11/8/60
* Colette 23/9/56
* Luisito 7/8/89
* Lucie 26/7/88
* Juliette 20/2/88
* Diego 26/4/87
parse() failed on argument: (…)

Forum Programmation.perl problème sympa (gestionnaire de mailing-lists)

Posté par  .
Étiquettes : aucune
0
2
août
2005
Voilà.

J'essaye de faire tourner sympa sur une redhat (sur laquelle il n' y a pas de package), et lorsque je le lance, j'ai une erreur sur le chargement d'un module perl :

[sympa@dsadv00003:~] # /etc/init.d/sympa start
Starting Sympa subsystem:
Starting module sympa.pl: Can't locate loadable object for module XML::LibXML::Common in @INC (@INC contains: /usr/product/sympa/bin /usr/lib/perl5/5.8.0/i386-linux-thread-multi /usr/lib/perl5/5.8.0 /usr/lib/perl5/site_perl/5.8.0/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.0 /usr/lib/perl5/site_perl /usr/lib/perl5/vendor_perl/5.8.0/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.0 /usr/lib/perl5/vendor_perl .) at /usr/lib/perl5/site_perl/5.8.0/i386-linux-thread-multi/XML/LibXML.pm line 11
Compilation failed in require at /usr/lib/perl5/site_perl/5.8.0/i386-linux-thread-multi/XML/LibXML.pm line 11.
BEGIN failed--compilation aborted at (…)

Forum Programmation.perl les threads ...

Posté par  (site web personnel) .
Étiquettes : aucune
0
26
juil.
2005
Je cherche a comprendre comme on s'en sert en PERL.
Voire mieux : les threads GTK2.
Mais la doc est bien pauvre et le me tape un message :


This Perl hasn't been configured and built properly for the threads
module to work. (The 'useithreads' configuration option hasn't been used.)

Having threads support requires all of Perl and all of the XS modules in
the Perl installation to be rebuilt, it is not just a question of adding
the threads (…)

Forum Programmation.perl rexep exception

Posté par  (site web personnel) .
Étiquettes : aucune
0
29
juin
2005
Bonjour à tous,

J'utilise actuellement un plugin pour nagios, écrit évidemment en Perl, qui me permet d'avoir les états des interfaces réseaux en fonction d'une regexp sur le nom. Or, j'aimerais pouvoir mutualiser au possible la définition du service qui s'en suivra. Aussi, j'aimerais donc avoir toutes les interfaces sauf une: "MS TCP Loopback interface".

Merci d'avance,

Forum Programmation.perl Source Perl

Posté par  .
Étiquettes : aucune
0
13
juil.
2005
bonjour,

Voila j'ai deux problèmes. Je suis sous linux, j'ai télécharger le source de Perl et je souhaiterai compiler le source pour avoir Perl sur une plateforme ARM. Je vois pas comment faire.
Deuxième chose je souhaiterai brider ma version du Perl, c'est à dire par exemple, de lui interdire la fonction open: je souhaiterai faire ça au moment de l'install du source. Je me demande si c'est pas possible dans le .config que configure génère.

si qqn a une (…)

Forum Programmation.perl Utilisation de Net::LDAP

Posté par  .
Étiquettes : aucune
0
8
juil.
2005
Salut tout le monde , j'ai un petit problème: je suis en train d'écrire un logiciel en perl dans lequel j'ai besoin d'effectuer une recherche dans un annuaire Ldap;les résultats de cette recherche sont ensuite affichés sur une page web(use DBI).Malheureusement, lorsque je fais mon bind le script s'interrompt et je ne peux meme pas récupérer de message d'erreur avec msg->code ou msg->error. Le pire c'est que si je sors ce passage ldap de mon script et que je le (…)

Forum Programmation.perl Suppression de fichier selon la date de creation

Posté par  .
Étiquettes : aucune
0
16
juin
2005
Bonjour à tous,

je suis un débutant en perl, je cherche à faire un perl qui me permettrait de supprimer des fichiers dans un repertoire selon leur date de creation.
exemple : supprimer tous les fichiers dont la date de creation est inférieur de 1 mois par rapport à la date du jour.

Quelqu'un pourrait-til m'aider.

merci par avance

Forum Programmation.perl Recuperer une valeur en Perl sur un site

Posté par  .
Étiquettes : aucune
0
5
juil.
2005
Bonjour, j aurais voulu savoir si il etait possible de recuperer une valeur en Perl en plein milieu d une page web ? ou est ce qu un autre langage serait plus adapte ? exemple : -la page est la suivante : http://us.expasy.org/uniprot/Q8X0Z6(...) - et je voudrais recuperer la valeur "Primary accession number" (2eme case du tableau) pour la stocker dans un fichier excel. merci d avance

Forum Programmation.perl Cross compilation

Posté par  .
Étiquettes : aucune
0
27
juin
2005

Bonjour,

je suis actuellement sur une plateforme i386 (et sous linux). Je souhaiterai compiler sur cette plateforme, un source Perl pour une plateforme ARM : en gros faire de la cross compilation.

Si qqn a une idée, …

Merci par avance

Forum Programmation.perl Analyse de code C++

Posté par  .
Étiquettes : aucune
0
6
juin
2005

Hello !

Non, ne vous inquiétez pas, je ne pense pas m'être trompé de forum…

Je cherche en fait un "bout de code" qui pourrait me permettre d'analyser et de remplacer des parties de sources qui sont en C++. Je penses que Perl est le mieux adapté, alors je poste donc ici.

L'idéal serait pour moi que le script me permette d'accéder à des classes / structures qui représentent mon code : les variables, les appels de fonctions, avaec quels paramètres, (…)

Forum Programmation.perl Dynaloader

Posté par  .
Étiquettes : aucune
0
16
juin
2005
Bonjour,

Je souhaiterai utiliser des bibliothèques (C) de façon dynamique pour un programme en Perl. Je sais qu'on peut le faire avec Dynaloader mais je trouve pas d'exemple ou de docs en Français expliquant comment s'en servir. Si vous connaissez son fonctionnement , faites moi signe svp

Merci par avance

jb

Forum Programmation.perl Regexp

Posté par  (site web personnel) .
Étiquettes : aucune
0
25
mai
2005
Bonjour à tous,

J'ai un problème d'expression régulière.
Je veux une expression qui reconnaisse par exemple "lockdev-1.0.0-1.2" mais pas "lockdev-devel-1.0.0-1.2". (Après, ce sera à généraliser pour d'autre termes que lockdev, mais ce ne sera plus un problème).

Cette expression sera utilisée dans une syntaxe du style:


if ("lockdev" =~ /$maJolieExpression/) {
print "OK\n";
}
else {
print "KO\n";
}


Cela interdit l'usage de syntaxe du style !~ ou des if imbriqués.

Ce que j'ai tenté, mais qui ne passe pas:
(…)

Forum Programmation.perl Script Perl pour transferts FTP

Posté par  .
Étiquettes : aucune
0
19
mai
2005
Bonjour,

Je débute en Perl et je cherche une bonne âme qui pourrait me donner un tuyau sur ce que je veux faire :

Je voudrait automatiser (sûrement avec un CRON) la connexion à un site FTP pour faire
- un PUT de fichiers avec une extension commune (*.t0? : par ex *.t01 et *.t02.....)
- un GET d'autres fichiers avec une autre extension (*.t?0 : par ex *.t10 et *.t20) et supprimer chaque fichier du site une fois téléchargé

(…)