Forum Programmation.perl Problème de connexion à une base Ingres

Posté par .
Tags : aucun
0
1
mar.
2006
Je n'arrive pas à me connecter à ma base Ingres voila le message d'erreur: install_driver(Ingres) failed: Can't load '/usr/lib/perl5/site_perl/5.8.5/i386-linux-thread-multi/auto/DBD/Ingres/Ingres.so' for module DBD::Ingres: libinterp.1.so: Ne peut ouvrir le fichier d'objet partagé: Aucun fichier ou répertoire de ce type at /usr/lib/perl5/5.8.5/i386-linux-thread-multi/DynaLoader.pm line 230. at (eval 3) line 3 Compilation failed in require at (eval 3) line 3. Perhaps a required shared library or dll isn't installed where expected at connexion01.pl line 7 Pouvez vous m'aider. Merci

Forum Programmation.perl afficher table de hachage

Posté par .
Tags : aucun
0
27
fév.
2006
bonjour tout le monde. Je suis le "absolute beginner", et j'aimerais savoir si il y a un moyen en Perl d'afficher tout le contenue d'une table de hachage. J'obtient ma table en faisant: $response = $session-#get_table( -baseoid =#; $oid ) ; ps: desolé pour cette question, mais je trouve pas...! pps: je n'arrive pas à afficher les "plus grand que", c'est remplacé par #

Forum Programmation.perl probleme de scripte

Posté par .
Tags : aucun
0
24
fév.
2006
voilà je suis perdue, j'ai besoin d'aide!!! j 'ai créé un formulaire d'enquete sur le logiciel modalisa. j'ai ensuite téléchargé sur mon serveur distant le fichier HTML du formulaire et un scripte cgi (vers lequel le bouton d'envoi du formulaire pointe)placé dans le repertoire cgi-bin. ça marche pas!!
détails du fichier .pl placé dans le repertoire cgi-bin :

#!/usr/bin/perl

if($ENV{'REQUEST_METHOD'} eq 'POST')
{
read(STDIN, $Data, $ENV{'CONTENT_LENGTH'});

# "modarep_perl.txt" est le nom du fichier dans lequel les réponses sont enregistrées
# (...)

Forum Programmation.perl Un pitit snmpwalk...?

Posté par .
Tags : aucun
0
24
fév.
2006
J'ai une toute pitite question, si quelqu'un pouvait m'aider,
ça m'aiderais bien...!

je fais un script pour recuperer des infos sur des equips reseau
et les coller dans un fichier en XML.

La partie collecte d'info ressemble à ça:


#!/usr/pkg/bin/perl -w

use SNMP ;

#$ENV{'MIBS'}="ALL"; #Load all available MIBs
$SNMP_TARGET = "$ARGV[0]";
$SNMP_COMMUNITY = "decK550";

$SESSION = new SNMP::Session (DestHost => $SNMP_TARGET,
Community => $SNMP_COMMUNITY,
Version => 1);

$LISTMIB = new SNMP::VarList(
['sysLocation'], #0
['sysName'], #1
['sysDescr'], #2
['sysUpTime'], #3
(...)

Forum Programmation.perl HTML::FORM modification d'une balise input read-only

Posté par .
Tags : aucun
0
24
fév.
2006
Salut,

Voila j'essaie de modifier une balise input read-only ( bis ), qui est normalement
modifier par du javascript avant envoie au serveur, mais j'obtiens le message d'erreur
suivant :

Input 'LAST_REP_PRINT_NONE' is readonly at test2.pl line 14

heum, la methode utiliser pour l'envoie est post. Donc si je ne me trompe pas il faut soit que je fasse les modif en amont de l'envoie, via un proxy, cela commence a faire lourd, soit trouver une methode beaucoup plus simple (...)

Forum Programmation.perl Comment faire ?

Posté par .
Tags : aucun
0
20
fév.
2006

Bonjour,

Je débute en Perl, alors je demande a ceux qui ne le sont pas d'être indulgent.

Voila, je cherche comment faire une redirection des erreurs de mon script vers un fichier log.

voici un exemple de mon script:

!/usr/bin/perl -w

open (F,'<intf.pl') || die "Probleme d'ouverture : $!" ;

my $i=0;

while (my $ligne = ) {

$i++;

}

print "\n\011Nombre de lignes du fichier $F : $i \n\n";

###################

ce que je souhaite, le message "Probleme d'ouverture" soit écrit (...)

Forum Programmation.perl Expressions regulière

Posté par (page perso) .
Tags : aucun
0
20
fév.
2006
Bonjour, j'ai un petit problème avec les reg-exp...
Je cherche à remplacer tout les espaces contenu entre 2 quotes.

par exemple j'ai une chaine a='hello "every body".linux "is great"'
après le remplacement avec un %20 par exemple, cette chaine devrai etre :
'hello "every%20body".linux "is%20great"'

Forum Programmation.perl Comment faire en perl une connexion sql

Posté par .
Tags : aucun
0
15
fév.
2006
Bonjour a tous

Je cherche comment faire en script perl une connexion a une base oracle et récupérer dans une table a un champ précis son contenu,
l'écrire dans un fichier txt puis écrire OK dans la table a un champ précis

nom base = ma_base
login = moi
pass = Cmoi
table = toto
champ = tata (pour la lecture)
champ = titi (pour l'ecriture)

Je ne connais pas assez le perl, car je l'apprends en ce moment.

voici (...)

Forum Programmation.perl Apache::ParseLog Et le parsing de log apache

Posté par (page perso) .
Tags : aucun
0
13
fév.
2006
Hello vous tous :)

voila bon je sais ca doit être la 120 ième question du genre,
mais j'ai des souci avec le module Apache::ParseLog ( http://search.cpan.org/~akira/Apache-ParseLog-1.02/ParseLog.(...) )

je cherche à récupérer les log des fichier pour les stoké dans une BD.

j'ai donc installer le module avec perl MakeFile.pl
make
make test
et sudo make install

jusque là, pas de pbm.

ensuite je prend un de leur exemple que je test.
et paf ca marche pas
$transferlog = $base->getTransferLog(); (...)

Forum Programmation.perl Modification de variables "dynamiques"

Posté par (page perso) .
Tags : aucun
0
9
fév.
2006
hello,

je suis bien conscient que mon titre ne veut pas dire grand chose, je vais mieux expliquer.

Mon code (simplifie) ressemble a ca:


my $variable;
my $v = "variable";

eval "\$$v = 42";

print "$variable\n"; #je voudrais avoir 42


En gros, j'ai une variable qui a un certain nom ($variable), une autre qui contient le nom de la premiere variable ('variable') et je veux pouvoir utiliser $variable a partir de son nom simplement, donc partir de $v.

C'est donc (...)

Forum Programmation.perl Perl et MySQL polices

Posté par .
Tags : aucun
0
8
fév.
2006
Salut, mon problème est le suivant:

je programme un petit logiciel de gestion en Perl, avec une interface graphique Tk et une base de donnée MySQL (via Tk, j'ai des onglet qui représente des entrées de formulaire avec des listes déroulantes de choix existants dans la base uniques, et des autos complétions pour le texte ainsi que des vues et tout ce qui va bien avec MySQL et Tk...), mais:

lorsque je rentre une donnée comportant un accent via mon (...)

Forum Programmation.perl fin de chaine

Posté par .
Tags : aucun
0
3
fév.
2006
Bonjour,

J'essaie de trouver les correspondance à $var, qui se trouve
à la fin de chaque ligne d'un tableau:


if ( $etchosts[$i] =~ $var$ ) {
print $&
}


et il me retourne une erreur.


Scalar found where operator expected at /root/equip line 31, near "$var$ )"
(Missing operator before $ )?)
syntax error at /root/equip line 31, near "$var$ ) "
syntax error at /root/equip line 38, near "}"


ça me bloque pour bien debuter en perl...!

Forum Programmation.perl incrementer des lettres...

Posté par .
Tags : aucun
0
2
jan.
2006
Bonjour, je voudrais mettre en place un script qui incrementerais
sur des lettres.

Du genre:

aaaa, puis aaab puis aaac, ... , aaaz, aaba, aabb, aabc.

Je ne trouve pas trop comment faire ça, et de plus je suis
tout nouveau dans le monde du perl (d'aujourd'hui en fait)

Merci d'avance...!!

Forum Programmation.perl script perl de récupération de fichiers

Posté par .
Tags : aucun
0
28
déc.
2005
Rebonjour!

je voudrai créer un fichier perl pour pouvoir récupérer des fichiers d'un serveur et les mettre dans un autre.

je vous explique plus en detail:

mon objectif c'est de transférer de maniere automatisée et périodique des fichiers qui se trouvent sous un répértoire donné d'un serveur windows vers un serveur linux ce qui alimentra la base de donnée se trouvant dans celui ci.
Nous disposons dans notre exemple que 4 serveurs, A, B, C, et D.
le serveur A (...)

Forum Programmation.perl Thread Perl (urgentissime :) )

Posté par .
Tags : aucun
0
28
déc.
2005
Bonjour à tous,

Je programme actuellement un script perl sur un linux embarqué. Je suis sur une plateforme ARM. Le script perl que je programme fait appel à une dizaine de modules (pm) que j'ai créer. Le script perl permet de lancer différents traitements sous forme de threads. Je souhaiterai lancer une trentaine de threads. Or étant sur un linux embarqué, je dispose que de 16Mo de mémoire (extensible à 32Mo). Mon script perl de base contient l'ensemble des bibliothèques (...)

Forum Programmation.perl CPAN et dépendances

Posté par .
Tags : aucun
0
21
déc.
2005
Bonjour,

Cela fait quelques temps que je navigue sans résultat sur le CPAN à la recherche de la fonctionnalité suivante : Avoir la liste des dépendances d'un module et ceci de manière récursive (exemple pour le module CGI::Builder::Session j'aurais les dépendances CGI::Builder et CGI::Session qui elles mêmes me donneraient récursivement CGI, POE ... et ainsi de suite jusqu'aux modules les plus élémentaires).

J'ai besoin de cette fonction afin de récupérer tous les modules utilisés par mon application pour l'installer sur (...)

Forum Programmation.perl de ISO-8859-1 en UTF-8 en pelr

Posté par .
Tags : aucun
0
19
déc.
2005
Bonjour,
J'amerais convertir un flux ISO-8859-1 en UTF-8 en perl... sans devoir passer par de fichiers ? y a-t-il un moyen ?
Je travaille avec perl 5.8.7, je reçois un flux en ISO-8859-1 et j'aimerais le convertir en UTF-8.
Je ne trouve pas de moyens à part en écrivant des fichiers, ce que j'aimerais éviter...
Y a-t-il des posibilités ? Quelqu'un peut m'aider ? Y existe-t-il des exemples ? Comment savoir le format du flux que j'obtiens ?
merci d'avance.
(...)

Forum Programmation.perl Consommation mémoire excessive

Posté par (page perso) .
Tags : aucun
0
30
nov.
2005
Bonsoir, suite à https://linuxfr.org/~golum/20068.html , j'ai écrit en perl le code correspondant.

Je suis politiquement content puisqu'il marche, mais informatiquement dubitatif puisqu'il me bouffe plus de 40 mo au bout d'une heure d'utilisation.

De bonne âmes pourraient-elles m'expliquer pourquoi (pour apprendre aux lecteurs ignorants) et proposer des solutions ?
Merci :)

Voici le code :

#!/usr/bin/perl

use WWW::Mechanize;

use strict;
use diagnostics;
use warnings;

my @url_list =
(
'http://www.google.fr/search?num=100&hl=fr&client=fir(...)

'http://www.google.fr/search?num=100&hl=fr&client=fir(...)

'http://www.google.fr/search?num=100&hl=fr&client=fir(...)

'http://www.google.fr/search?num=100&hl=fr&client=fir(...)

'http://www.google.fr/search?num=100&hl=fr&client=fir(...)

'http://www.google.fr/search?num=100&hl=fr&client=fir(...)

(...)

Forum Programmation.perl Regexp pour contôle d'alias

Posté par (page perso) .
Tags : aucun
0
24
nov.
2005
Bonjour à tous.

Je suis en train de faire un p'tit script perl pour ajouter facilement des alias dans le fichier ~/.bash_alias. Pour éviter que l'utilisateur n'entre n'importe quoi, je voudrais contrôler la syntaxe de l'alias entré par une regexp.

Le pattern est donc le suivant : nom_sans_espace='des commandes'

Je n'arrive pas à créer la regexp correspondante. Vous pouvez m'aider ?

Merci :)

Forum Programmation.perl Les mails et le charset windows-1252

Posté par .
Tags : aucun
0
18
nov.
2005
Grmpf! Il y a des clients mail windows qui ne suivent pas la RFC 1522 (quelle surprise, me direz-vous), et ça donne des sujets de mail imcompréhensible pour
- le module MIME::WordDecoder de perl
- le logiciel ripmime

Par exemple, voici un extrait de mail reçu:
...
Subject: Avis de =?windows-1252?Q?r=E9ception_d=27un_paiement=5D?=
...

Pour les "=E9", "=27" et "=5D", pas de problèmes, c'est standard. Mais comment gérer le "?windows-1252...", en perl de préférence ?

Forum Programmation.perl comment integrer un ".bat" dans un programme perl

Posté par .
Tags : aucun
0
16
nov.
2005
autamatique du langage médical".

le professeur, nous a confié un projet en perl, le programme doit faire appel à un script.bat.
notre problème c'est qu'on ne sais pas comment appeler un script (.bat) à l'interieur d'un programme perl, où bien comment on peut mettre les lignes du script dans le programme perl!!
rmq: le script dont je parle est une suite de commande qui permet d'exploiter un logiciel OpenSource " UNITEX" pour le traitement et la recherche des _expression dans (...)