[R] Regex - énumérer les variables d'un array

[JulienBoul]

Code: [Tout sélectionner] [Déplier/Replier]

#include<Array.au3>
#include"File.au3"

$Var1 = _FileListToArray (@scriptdir&"\download", "*_ListePieces.pdf", 1, 0)
_ArrayDisplay($Var1, "Liste fichier")  ; Ceci est facultatif, c'est juste pour afficher la liste des fichiers du dossier

For $i = 0 To UBound($Var1) - 1
   Msgbox ("","",$Var1[$i+1])
   $string = stringregexp ($Var1[$i+1],"(?m)^\d{1,}[^_]")
   Msgbox("","",$string)
Next

GeSHi © Extension Codebox Plus

Bonjour,
J'ai un dossier comme celui ci:

Capture2.JPG (14 Kio) Vu 1274 fois

et je souhaite énumérer mes variables de la ligne 1 à n (sans prendre la ligne 0) afin d'executer un script sur chaque élément constituant de mon dossier (liste de pièces uniquement) et en ne conservant que ce qui est avant le "_".

Capture.JPG (22.15 Kio) Vu 1274 fois

J'arrive a faire mon tableau, mais je n'arrive pas a isoler mon code technique avec une regex. Je dois pas être loin mais mon bout de code marche pas... pouvez vous m'aider?

Merccciiiii

[orax]

(;¬_¬) ^[^_]+

Cherche en début de chaîne, un caractère qui n'est pas « _ », une fois ou plus.

[JulienBoul]

Orax mon sauveur ^^

Merci.

^[^_]+

est identique a

(?m)^\d{1,}[^_]

(sur le résultat du moins), et je conserve ta méthode, mille fois plus simple... C'est l'ennui lorsqu'on cherche à taton sur un simulateur, on arrive vite à des couches superposées inutiles... je finirais par domestiquer les regex, j'y travaille.

Ce qui me contrarie, c'est que mon second msgbox, celui censé me donner uniquement "854298729820" par exemple, ben il me retourne "1"... J'me demande s'il n'essaie pas de lire mon tableau sur le mauvais axe...

Tu peux m'aider à ce sujet? pour le test, il suffit de renommer un quelconque fichier pdf de la façon "854249729820_ListePieces.pdf" par exemple.

Cdt, Julien.

[jguinch]

Il faut voir du côté du paramètre Flag : par défaut, s'il n'est pas spécifié, le paramètre est 0 : retourne 1 si ça match ou 0 sinon.
Il faut donc soit utiliser la paramètre 1 (ou 3) : la valeur retournée sera un tableau.

Code: [Tout sélectionner] [Déplier/Replier]

$aString = stringregexp ($Var1[$i+1],"^[^_]+", 1)
MsgBox(0, "", $aString[0])

GeSHi © Extension Codebox Plus

Sinon, tu peux utiliser StringRegExpReplace :

Code: [Tout sélectionner] [Déplier/Replier]

$string = stringregexpreplace ($Var1[$i+1],"_.+", "")
MsgBox(0, "", $string)

GeSHi © Extension Codebox Plus

[JulienBoul]

Ouep, les deux solutions fonctionnent, à noter que dans ton second code, il faut bien noter

Code: [Tout sélectionner] [Déplier/Replier]

$string = StringRegExpReplace ($Var1[$i+1],"_.+", "")
MsgBox(0, "", $string)

GeSHi © Extension Codebox Plus

Super, je continue mon script, c'est top de savoir qu'y'a toujours un filet lorsqu'on débute l'équilibrisme...

@+ Julien.

[jguinch]

oups, désolé. j'ai corrigé.