Forum Programmation.perl mod_perl2, CGI, et POST

Posté par (page perso) .
Tags : aucun
0
24
fév.
2005
Bonjour,

Depuis hier, je tente de porter mon script python écrit en 5min qui utilise mod_python pour simplement récupérer un fichier envoyé par un client via un POST. Super simple donc.
Maintenant, j'ai des contraintes, je dois utiliser perl. Je me suis donc tourner vers mod_perl qui semble bien plus efficace qu'un simple CGI (surtout que je vais recevoir des rafales de plusieurs centaines de requetes). Autre contrainte, ma distribution basée sur RedHat ne semble pas avoir de paquet pour (...)

Forum Programmation.perl Lancer un programme depuis perl et sortie

Posté par .
Tags : aucun
0
23
fév.
2005
Que se passe t'il lorsqu'on lance un programme binaire depuis un script perl

La sortie du programme devient t'elle la sortie du script perl ?
Le prog attent t'il la fin de l'execution du premier programme ou lance t'il tout de suite le second

En gros puis-je uttiliser perl plutot qu'un script shell

pour lancer plusieurs fois un programme avec des arguments defini par une boucle for Tout en ayant la sortie sur STDOUT ?


est ce que

for i,j

(...)

Forum Programmation.perl mettre les données d'un fichier dans un tableau

Posté par (page perso) .
Tags : aucun
0
21
fév.
2005
Bonjour les mongueurs ;)

Hypothèses de départ :
  • je ne sais pas du tout programmer en Perl (et très peu en autre chose),
  • Je me soigne
  • Je fais de l'astro avec des fichiers de données MON-STRU-EUX


  • Objectifs : Retirer les données du fichier et les avoir sous forme de tableau (ou autre possibilité plus pratique auquel je ne pense pas)

    Format du fichier : (attention long)

    Enter starting date of tabulation
    Calendar date: Year (1986) ? Month (1-12) (1) ? (...)

    Forum Programmation.perl Un "ls -rtl" récursif

    Posté par (page perso) .
    Tags : aucun
    0
    7
    fév.
    2005
    J'utilise énormément ls -rtl pour visualiser plus rapidement les derniers fichiers modifiés dans un répertoire : ça permet facilement de voir les derniers fichiers de conf modifiés, les derniers fichiers de log créés, etc. Mais comment faire cela récursivement ? Je n'ai trouvé aucune commande pour le faire, alors je l'ai fait moi-même en Perl :

    http://zarb.org/~gc/html/find_recent.html(...)

    Peut-être que ça en aidera d'autres...

    Forum Programmation.perl je veux apprendre le perl

    Posté par .
    Tags : aucun
    0
    4
    fév.
    2005
    Etant donner que je suis interessé par le perl pour la programmation reseau et systeme, je suis pas tellement bon dans la programmation de base avec les langages java,php ,c et c++. Mais etant donner que je suis fan de reseau et systeme, ce langage m'interesse beaucoup pour les scripts. Quelqu'un pourrait me proposer un livre pour commencer dans ce langage. J'ai trouve un bon site dessus, quelqu'un pourrait me conseiller et m'orienter.

    Merci d'avance

    Dan Kakon

    Forum Programmation.perl [débutant]Regexp sur chaîne de longueur inconnu

    Posté par (page perso) .
    Tags : aucun
    0
    27
    jan.
    2005
    Bonjour, je suis en train de coder un petit programme qui transforme certaines séquences de code C en code d'un autre langage, lisaac, pour le besoin d'un ami qui doit traduire 50000 lignes de C en ce langage.

    J'en ai profité pour découvrir Perl.

    Je travaille sur le problème suivant :

    traiter int a,*b,c,*d; qui se tranforme en

    + a,c : INTEGER;
    + b,d : ARRAY[INTEGER];

    mon problème est de détecter et séparer les tableau des entiers statiques.

    j'ai donc (...)

    Forum Programmation.perl Remplacement à la chaine dans un dossier

    Posté par (page perso) .
    Tags : aucun
    0
    25
    jan.
    2005
    bonjour,

    je suis à la recherche d'un programme me permettant de chercher des motifs (via des regexp) dans différents fichiers d'une arborescence, afin d'y effectuer des remplacements en série, sachant que les chaines que je veux insérer, contiendront des bouts de chaines matchées (entendre par là les références arrières)

    Bref je sais pas si c'est très clair, donc un ptit exemple :
    je recherche
    "plop (.+?), ca va \?" --> va matcher "plop cho7, ca va ?"
    et je remplace (...)

    Forum Programmation.perl desinstaller un module perl ?

    Posté par .
    Tags : aucun
    0
    22
    jan.
    2005
    Bonjour,

    J'ai construit un wrapper perl pour un des mes projects (wzdftpd) en utilisant perlxs. Il se contruit et s'installe correctement, mais impossible de le desinstaller:

    make uninstall

    Uninstall is unsafe and deprecated, the uninstallation was not performed.
    We will show what would have been done.

    no packlist file found: at /usr/share/perl/5.8/ExtUtils/Install.pm line 318.


    Si j'essaye la commande manuellement, rien de mieux:

    perl "-MExtUtils::Command::MM" -e uninstall /home/pollux/DEL/lib/perl/5.8.4/auto/wzdftpd/.packlist

    Uninstall is unsafe and deprecated, the uninstallation was not performed.
    We will show (...)

    Forum Programmation.perl Invoquer une fonction se situant dans une table de hashage déclaré dans un autre paquetage

    Posté par .
    Tags : aucun
    0
    3
    oct.
    2004
    Comment invoque-t-on une fonction située dans une table de hashage déclarée dans un autre paquetage?
    Le truc qui merde le moins, c'est :
    $attaques::list->{$natt}->(\$lanceur,\$preneur);
    sachant que
    $attaques::list->{$natt}(\$lanceur,\$preneur); donne le même msg d'erreur.
    list est bien délcaré avec our.

    Forum Programmation.perl Charder des autres fichiers & utiliser des répertoires

    Posté par .
    Tags : aucun
    0
    24
    août
    2004
    Bonjour,

    Bon voilà, j'use et j'abuse de "require truc.pl" quand je peux mettre du code partagé entre différentes applications dans un fichier truc.pl (j'ai hérité ça du C).

    Vous allez me dire, c'est une bonne idée, ca permet de maintenir un peu plus facilement le code. Le problème est que Perl n'est pas (trop) prévu pour ça.

    Mon cas (avec /usr/local/ comme préfixe, par exemple):
    - les binaires sont dans bin.
    - truc.pl devrait se trouver dans share/nom_du_soft/.

    Jusqu'à présent, (...)

    Forum Programmation.perl Des regexps plus rapides !

    Posté par .
    Tags : aucun
    0
    24
    août
    2004
    Bonjour,

    Tout est dans le titre.
    Dans mon cas, j'ai une chaîne qui contient du texte. A côté, j'ai un tableau rempli d'éléments (environ 100-200), dont certains contiennent du code d'expression régulière. L'objectif est de savoir, pour chaque élément du tableau, s'il est contenu dans la chaîne (et éventuellement de le renvoyer dans un autre tableau).

    Ce que je fais, c'est un grep, du genre:
    @nouveau_tableau = grep($ma_chaine =~ m/$_/, @mon_tableau);

    J'ai essayé aussi avec un foreach.

    Le problème, c'est (...)

    Forum Programmation.perl Localisation

    Posté par .
    Tags : aucun
    0
    13
    août
    2004
    Bonjour,

    Voilà, je crée actuellement un logiciel en Perl (que je devrais bientôt rendre public) et j'ai envie de faire une traduction.

    C'est pour cela que j'en appelle à votre science et votre expérience. Si vous avez déjà fait ça, comment l'avez-vous fait ?

    Pour info, ce logiciel fait moins de 1500 lignes de code (~1200 sans les commentaires), ce dont je suis plutôt content car les logiciels du même genre font plutôt 3000 lignes avec des fonctionnalités en moins. (...)

    Forum Programmation.perl HTML <-> ASCII

    Posté par .
    Tags : aucun
    0
    4
    août
    2004
    Salut tout le monde,

    Comme j'ai un peu de temps libre, je me mets au Perl. Actuellement, j'écris un programme qui va chercher des images sur un site, les sauvegarde et écrit les données ITPC en fonction de ce qu'il a trouvé sur la page.

    Jusque là, grâce aux articles des mongueurs, je m'en sors sans trop de problème. Merci à eux d'ailleurs pour leur beau boulot. Mais y a un petit détail qui me chiffonne... Vu que le prog (...)

    Forum Programmation.perl Argggggggg dans un fichier avec des 0x00

    Posté par .
    Tags : aucun
    0
    20
    juil.
    2004
    Salut !!!!

    Je cherche desesperement à écrire avec perl un fichier binaire avec plein d'informations....

    J'ai déjà le code qui écrit le fichier avec la bonne syntaxe au format ascii et j aimerai le transcrire au format binaire (à savoir tout mettre en hexa et remplacer les espaces par des 0x00)...

    Exemple :
    1 2 (format ascii)
    3
    -------->
    000000010000000000000000000002
    00000003 (format binaire)

    Quelqu un sait comment réaliser simplement cela ???

    Merci !!!!

    Forum Programmation.perl threads - fork() ...

    Posté par (page perso) .
    Tags : aucun
    0
    6
    juil.
    2004
    Bonsoir,

    J'aimerais trouver un moyen pratique, portable de faire du multitache en perl ... J'ai testé les threads et fork() qui semble être porté sous Fenêtres(R) mais ...
    - fork() me permet d'envoyer des signaux aux processus
    - les threads me permettent de partages des données facilement (files, variables partagées, vérous, sémaphores)
    - les threads fonctionnent partout
    - Mon application utilisant les threads à la place de fork() était plus lente (peut être car j'avais ajouté des fonctionnalités)

    J'aimerais donc (...)

    Forum Programmation.perl Use of uninitialized value pour tester si une variable existe

    Posté par (page perso) .
    Tags : aucun
    0
    4
    juil.
    2004
    C'est encore moi .... je fais mon serveur et j'utilise maintenant les thread de perl. Et j'ai un problème pour tester si une variable existe ... Voici donc mon code un peu simplifié: #!/usr/bin/perl -w use strict; # use diagnostics; use IO::Socket; use Net::hostent; # gethostbyaddr() use threads; # use thread::Queue; use threads::shared; my $server; my @messages : shared = (); my $current_message : shared; my $life : shared = 1; $server = IO::Socket::INET->new( Proto => $protocol, LocalPort => $port, (...)

    Forum Programmation.perl caractères invisibles dans une chaîne (sockets)

    Posté par (page perso) .
    Tags : aucun
    0
    3
    juil.
    2004
    Je vais toujours poster le code source du serveur (le client, cest telnet):
    #!/usr/bin/perl -w use strict; use IO::Socket; # Usage: # # client.pl [ (--exit|-e)  ] [ ] [ ] # client.pl [ -h ] [ --help ] my $filename = "client.pl"; my $help = " Usage $filename [ ] [ ] Options ( -P | --port )  Port to listen ( -p | --protocol ) Set a protocol (tcp, udp, ...). Default is \"tcp\" (...)

    Forum Programmation.perl blogogoud ...

    Posté par .
    Tags : aucun
    0
    29
    juin
    2004
    Coincoin (Le premier qui dit panpan s'en prend une ;))

    Bon, voilà, j'ai un problème métaphysique. les feuilles de style personnalisées c'est bien, mais je trouve pas ça encore assez marrant.
    Donc l'idée que j'ai dans un coin, c'est en fait de fournir simplement de quoi faire sa propre page, en utilisant des données communes, en passant par un certain nombre de fonctions disponibles. En gros, on a quelque chose du genre :


    SGBD --> fonction d'accès données --> diverses (...)

    Forum Programmation.perl Avoir le debit d'une connexion

    Posté par .
    Tags : aucun
    0
    17
    juin
    2004
    Salut, Je cherche un moyen sur google.... de trouver le débit d'une connexion j'ai pense a cat /proc/.... mais je trouve rien (du moins je pense) sur le débit d'une connexion/seconde. Auriez vous une idée pour récupérer en PERL le débit? Merci d'avance bye