IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Modules Perl Discussion :

Lecture de fichier Lotus word pro


Sujet :

Modules Perl

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé Avatar de scaleo
    Profil pro
    Inscrit en
    Septembre 2005
    Messages
    327
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2005
    Messages : 327
    Par défaut Lecture de fichier Lotus word pro
    Bonjour je cherche depuis quelque jours déjà comment lire les fichiers lotus word pro (lwp) et ms document imaging (mdi) avant de me lancer dans la programmation de modules spécifique j'aimerai savoir si quelqu'un connais un module pour l'un ou lautre de ces formats.

    J'ai aussi besoin d'un petit coup de main avec html::parser je comprend pas trop comment il marche , je veut extraire d'une page web comme :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    <html>
    <head>
    <title>test</title>
    </head>
     
    <body>
    <img alt="gna gna gna" src="blabla.gif" border="0" width="60" height="60" />
     <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="900" height="480">
        <param name="movie" value="morleycover.swf" />
        <param name="quality" value="high" />
        <embed src="morleycover.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="900" height="480"></embed>
      </object></body></html>
    le flash <object></object> et le alt de l'image j'ai beau me creuser la tête je n'y arrive pas

    merci

  2. #2
    Membre éclairé Avatar de scaleo
    Profil pro
    Inscrit en
    Septembre 2005
    Messages
    327
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2005
    Messages : 327
    Par défaut
    Oki donc je vais coder sa, mais pour html::parser j'y arrive pas moi et ce module ont commence sérieusement a être faché

  3. #3
    Expert confirmé
    Avatar de Jedai
    Homme Profil pro
    Enseignant
    Inscrit en
    Avril 2003
    Messages
    6 245
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Côte d'Or (Bourgogne)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Avril 2003
    Messages : 6 245
    Par défaut
    HTML:arser est un parser basé sur les évènements, en tant que tel il n'est pas très compliqué, mais il faut raisonner d'une manière particulière (automates à états, éventuellement à pile) pour en tirer parti :
    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
    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
    55
    56
    57
     
    #!/usr/bin/perl
    use strict; use warnings;
     
    use HTML::Parser ();
     
    {
      my $in_object = 0;
     
      sub start {
        my ($tag, $text) = @_;
        if( not $in_object ){
          if( $tag eq 'object' ) {
            print $text;
            $in_object++;
          }
        } else {
          print $text;
        }
      }
     
      sub end {
        my ($tag, $text) = @_;
        if( $in_object ) {
          print $text;
          $in_object-- if( $tag eq 'object' );
        }
      }
     
      sub text {
        my $text = shift;
        if( $in_object ){
          print $text;
        }
      }
    }
     
    my $p = HTML::Parser->new( api_version => 3,
                             start_h => [\&start, "tagname, text"],
                             end_h   => [\&end,   "tagname, text"],
                             text_h => [\&text, "text"]
                           );
     
    $p->parse_file( *DATA );
    __DATA__
    <html>
    <head>
    <title>test</title>
    </head>
     
    <body>
    <img alt="gna gna gna" src="blabla.gif" border="0" width="60" height="60" />
     <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="900" height="480">
        <param name="movie" value="morleycover.swf" />
        <param name="quality" value="high" />
        <embed src="morleycover.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="900" height="480"></embed>
      </object></body></html>
    --
    Jedaï

  4. #4
    Membre éclairé Avatar de scaleo
    Profil pro
    Inscrit en
    Septembre 2005
    Messages
    327
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2005
    Messages : 327
    Par défaut
    Merci pour le bout de code Jedai , j'ai compris comment sa marche grace a lui

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. lecture fichier MS Word
    Par Jasmine80 dans le forum Langage
    Réponses: 20
    Dernier message: 19/05/2009, 09h02
  2. [POI] Problème de lecture des fichiers Word
    Par Dari dans le forum Documents
    Réponses: 9
    Dernier message: 05/07/2007, 14h08
  3. [POI] Lecture de fichiers word
    Par log2n dans le forum Documents
    Réponses: 1
    Dernier message: 20/04/2006, 13h24
  4. Réponses: 8
    Dernier message: 09/08/2005, 11h44
  5. Lecture de fichiers Word 97
    Par BARBIER dans le forum Modules
    Réponses: 4
    Dernier message: 09/07/2004, 13h55

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo