====== Différences ====== Cette page vous donne les différences entre la révision choisie et la version actuelle de la page.
mc:ptab [2008/12/18 21:30] maxime |
mc:ptab [2010/06/29 06:15] (Version actuelle) newacct |
||
---|---|---|---|
Ligne 125: | Ligne 125: | ||
Il existe deux modes, tableau classique avec l'environnement ''tabular'', et tableau //mathématiques// avec l'environnement ''array''. | Il existe deux modes, tableau classique avec l'environnement ''tabular'', et tableau //mathématiques// avec l'environnement ''array''. | ||
- | Le mode classique est le mode par défaut, il n'y a pas d'option particulière... | + | Le mode classique est le mode par défaut, il n'y a pas d'option particulière... |
+ | |||
+ | **Remarque** Pour revenir en mode tableau, on utilise la commande : | ||
+ | <code> | ||
+ | .pt tableau | ||
+ | </code> | ||
=== Mode math === | === Mode math === | ||
Ligne 202: | Ligne 207: | ||
open(WTEX, ">$chemin/$nomw"); # ouverture en ecriture d'un fichier .w (de travail) | open(WTEX, ">$chemin/$nomw"); # ouverture en ecriture d'un fichier .w (de travail) | ||
while (<WORK>){ #pour chaque ligne du document original | while (<WORK>){ #pour chaque ligne du document original | ||
- | @ligne = split /\s+/; # on séparer chaque mots de chaque ligne | + | @ligne = split; # on séparer chaque mots de chaque ligne |
if($ligne[0] eq ".pt"){ # on lit le paramétrage | if($ligne[0] eq ".pt"){ # on lit le paramétrage | ||
if($ligne[1] eq "math"){ # si math | if($ligne[1] eq "math"){ # si math | ||
Ligne 231: | Ligne 236: | ||
open(DAT, "$ligne[1]") or die "Impossible d'ouvrir $ligne[1]"; #on ouvre ce fichier | open(DAT, "$ligne[1]") or die "Impossible d'ouvrir $ligne[1]"; #on ouvre ce fichier | ||
open(DATTEX, ">$chemin/$prefixe\.tex"); # on cree un fichier $prefixe.tex dans lequel il y aura le tableau en latex | open(DATTEX, ">$chemin/$prefixe\.tex"); # on cree un fichier $prefixe.tex dans lequel il y aura le tableau en latex | ||
- | $taille = split/\s+/, <DAT>; #on recupere le nombre de colonne | + | $taille = split ' ', <DAT>; #on recupere le nombre de colonne |
close(DAT); | close(DAT); | ||
open(DAT, "$ligne[1]"); | open(DAT, "$ligne[1]"); | ||
Ligne 237: | Ligne 242: | ||
print(DATTEX "$deliml\\begin\{$type\}\{$inter$c\}\n$separvert\n"); # on commence notre tableau (ca depend des options) | print(DATTEX "$deliml\\begin\{$type\}\{$inter$c\}\n$separvert\n"); # on commence notre tableau (ca depend des options) | ||
while(<DAT>){ | while(<DAT>){ | ||
- | @lignedat= split/\s+/; | + | @lignedat= split; |
$tail= @lignedat; | $tail= @lignedat; | ||
for($i=0;$i<$tail;$i++){ | for($i=0;$i<$tail;$i++){ |