warwick a écrit 219 commentaires

Je ne peux pas t'aider sur Twig (il est minuit 15 chez moi, je dois aller au lit).
Essaye ca:

#!/usr/bin/perl                      
use strict;
use warnings;
use XML::Twig;   
use Text::CSV;                  
use File::Find;


my $FileResult = $ARGV[1] || 'result.csv'; 
my $FhResult;

my $folder ='.';
my $twig2= XML::Twig->new(    
    twig_handlers => { 
        'Parameter' => sub { 
            my $attr_value = $_->{'att'}->{'value'} // 'fault';  
            print $FhResult $attr_value . ",";
        },
    },
);

sub newwanted {
    my ($dev,$ino,$mode,$nlink,$uid,$gid,$name);

    (($dev,$ino,$mode,$nlink,$uid,$gid) = lstat($_)) &&
    -f _ &&
    /^.*\.xml\z/s
    && processXML($name);
}

sub processXML ($) {
    print $FhResult( (split('_', "\n$_",2))[0] . ',' ); 
    $twig2->parsefile($_);
}

open( $FhResult, '>', $FileResult ) or die("Unable to open file $FileResult\n$!");

find({
   wanted   => \&newwanted,
}, $folder);

close $FhResult;

Ca retourne ceci dans results.csv chez moi:

$ cat result.csv 

4.xml,
1.xml,
3.xml,
2.xml,

Pas sur que ça marche sans cygwin (il est sous windows) le coup de passer par ARGV.

Windows 7 par exemple a des limitations du type si PATH a une longueur supérieure à 2048 chars, alors quasi plus rien ne marche (si les variables paths système genre C:\windows\ sont à la fin et donc ignorées ? je n'ai pas vérifié).

Henry parle de milliers de fichiers donc ça me parait mal barré sans cygwin.

Bon je viens de capter que tu es sous Windows.
Je pense que la suggestion de fearan sur faire ton truc en powershell est pertinente (no troll, powershell est vraiment pas mal).
Cela dit, il semble que tu aies déjà du code en perl, et de toute façon, on est pas sur DLFP pour pousser les gens à dev en .ps.

Erratum sur le précédent commentaire: ajoutes -type f:

find2perl /home/henry/xmlfolder/ -type f -name "*.xml" > lasolutionamonprobleme.pl


En gros tu as :

use strict;
use File::Find ();

# Set the variable $File::Find::dont_use_nlink if you're using AFS,
# since AFS cheats.

# for the convenience of &wanted calls, including -eval statements:
use vars qw/*name *dir *prune/;
*name   = *File::Find::name;
*dir    = *File::Find::dir;
*prune  = *File::Find::prune;

sub wanted;

# Traverse desired filesystems
File::Find::find({wanted => \&wanted}, '/home/henry/xmlfolder/');
exit;

sub wanted {
    my ($dev,$ino,$mode,$nlink,$uid,$gid);

    (($dev,$ino,$mode,$nlink,$uid,$gid) = lstat($_)) &&
    -f _ &&
    /^.*\.xml\z/s
    && print("$name\n");
}

Tu crées une belle fonction processXML :

sub processXML ($) {
    print $_."\n";
}

et tu remplaces la fonction wanted par:

sub wanted {
    my ($dev,$ino,$mode,$nlink,$uid,$gid);

    (($dev,$ino,$mode,$nlink,$uid,$gid) = lstat($_)) &&
    -f _ &&
    /^.*\.xml\z/s
    && processXML($name);
}

C'est en récursif, je n'ai pas cherché comment désactiver la récursivité.

Pour mettre le path de recherche des fichiers xml en argument de lasolutionamonprobleme.pl, réfères toi à l'article des mongueurs sus-mentionné.

P.S.1.: La solution est présentée comme telle pour plus de clarté, mais tu peux évidemment faire ton traitement xml dans la fonction wanted.

P.S.2. : [à prendre avec des pincettes] Ton affirmation sur "tous les fichiers donc les noms commence par d et t" a l'air incorrecte, il s'agirait en fait de tous les fichiers ou dossiers contenants un d ou un t (ainsi que tous les enfants si il s'agit d'un dossier) et ce de manière récursive?
par exemple, ca retourne ca sur mon ~:
Found it /home/warwick/.icedove/dhi10c6d.default/extensions/rikaichan-jpfr@polarcloud.com/chrome/rikaichan-jpfr.jar

J'utilise une syntaxe PCRE pour mes regex et je suis un peu paumé avec ton exemple. Chez moi, la syntaxe suivante fonctionne:
/^[d|t].*\z/si (le i pour conserver ton case insensitive).

P.S.3.: Tu n'as pas fermé ton filehandle dans le bout de code que tu donnes.
https://en.wikipedia.org/wiki/Handle_leak

P.S.4.: Tu codes avec le compte admin ?

P.S.Vita.: Non, je ne fais aucunement de la pub à Sony.

P.S.CoinCoin.: J'espère que j'ai pas passe une partie de ma soirée après 12h au taff pour ne pas répondre à ta question…

find2perl /home/henri/xmlfolder/ -name "*.xml" > lasolutionamonprobleme.pl


http://www.perlmonks.org/?node_id=691699

En gros 3 façons:
La première (glob) est intégrée et te permet de spécifier un truc du genre /mon/path/*.xml

La suivante (File::Util) offre la récursivité si besoin (genre tu spécifies 2 arguments "perl monscript.pl --dir /mon/* -R) mais tu n'as pas par contre filtrage par pattern de nom de fichier (a moins bien sur de le faire sur le résultat retourne par File::Util)

La troisième m'est inconnue, mais a l'air de cumuler les fonctionnalités des trois, peut-être au prix d'un effort de compréhension supplémentaire?
Indice, ça correspondant à find (1) dans l'esprit.
(note a moi-même : à lire quand il ne sera pas 00:10)

Pour la gestion des paramètres dans ton script, je te conseille la lecture de http://articles.mongueurs.net/magazines/linuxmag49.html si besoin est.

Dans tous les cas, n'oublie pas : "There's more than one way to do it"

Je rajoute le mot volitif (tant comme adjectif que substantif), qui est souvent utilisé en grammaire pour parler des formes verbales volitives -> où l'on exprime sa volonté d'action.

Je suis très loin d'être connaisseur en grammaire, mais j'ai vu ce mot de manière répétée en anglais pour mon lent apprentissage du japonais.

P.S.: encore une fois, je déteste le correcteur de Firefox qui ne m'aide pas a ajouter la cédille à francais pour devenir français (clavier japonais, et je ne me suis toujours pas fait a l'utilisation du truc avec alt)…

Tu lui diras que j'ai quand même eu le temps de le télécharger, et que n'ayant pas de carte de crédit, je le remercie de sa compréhension.

Merci d'avance.

Les cartes supportées par ffado (donc entièrement en espace utilisateur) le sont maintenant aussi par Alsa.
Ce travail a été réalisé par Takashi Sakamoto (à ne pas confondre avec Takashi Awai, le prolifique contributeur à Alsa!)

Cela ne concerne que la gestion des flux PCM et Midi. Certains outils userspace issus de ffado tels que ffado-mixer sont donc encore nécessaires.

http://permalink.gmane.org/gmane.linux.kernel.firewire.devel/17154
https://github.com/takaswie/alsa-firewire-report/blob/master/firewire.pdf

http://openbenchmarking.org/index

Content d'avoir NoScript du coup.

En France, ouais peut-être. Par contre, dans de lointaines contrées, c'est un autre délire.
Tous les linuxiens que je connais par ici utilisent maintenant une machine sous OSeX ou dérivé (iPron, Ipad). Ca fout les glandes.

Comme dirait l'autre, Debian un jour, Debian toujours.

T'es fumeur et tu vis dans un vieil apart le long d'une avenue sur laquelle passe des bus à longueur de journées?
No surprise.

Il faut faire le ménage chez toi. Tu élimineras une source d'encrassement de tes rads (et de tes poumons si tu arrêtes de fumer, et je parles en connaissance de cause niveau encrassement des poumons).

Relativisons mes propos (ou pas), et notons le point d'interrogation à la première ligne.

Ta machine étais en peine (pour évoquer les protections thermiques, je pense que bon, tu dois commencer à t'y connaître en cuisses grillées), tu n'en t'en est pas occupé avant qu'elle lâche, c'est de ta faute (sans aller jusqu'au tournevis, un coup d'aspiro dans les bouches aide pas mal).

Tu parles de 2 ans, alors que cette machine est passée en review chez 01.net il y a 7 ans. A moins de l'avoir achetée en promotion a la foir'fouille, je ne comprends pas comment tu as pu acquérir cette machine il y a 2 ans.

Tu as crée ton compte aujourd'hui? Pour ça?
Sois gentil, fais marche arrière de suite.

Je ne te salue pas.

J'en connais au moins deux IRL, mais je ne sais pas si ils viennent encore souvent sur linuxfr. Il y a au moins deux autres users que toi et que les sus-mentionnés.

Pour l'apéro, c'est une bonne première occasion.

• Borislav Inovva
• J'ai vraiment un humour de merde

Il y a des chances que tu trouves ça ou équivalent en cherchant dans tes sources (suis au boulot, je ne peux pas vérifier facilement :()

typedef unsigned short u16;

Du coup, il faudrait certainement inclure une bonne partie des includes noyau de l'archi cible…

Il y a pas mal de paquets à installer en multiarch.
Pour ce problème, il faut libasound2-plugins:i386.
J'ai eu aussi a installer libgl1-mesa-glx:i386 et consort.

Ils ont apparemment développés leur propre framework en Lua, nommé dokidoki

De mon coté, j'ai commencé à regarder LÖVE, également en Lua, que j'ai découvert ici-même par ce journal (j'ai visiblement loupe les journaux de B16F4RV4RD1N sur le sujet: 1 et 2)

Pour faire une (très) rapide comparaison, LÖVE a un moteur de physique (je ne m'y connais rien, alors je m'abstiens de le qualifier de complet ou pas), est documenté, et du coup est un moyen ludique de se mettre à Lua. Il y a aussi un port en cours sur Android (que je n'ai pas testé).

En espérant que ça inspire des apprentis développeurs de jeux 2d :)
Et merci aux auteurs pour ces deux frameworks!

Comme partout,non? Peut-être pas en taule, mais ça reste à démontrer…

3° Merci pour ton illustration de

Les statistiques, les math les moins comprise au monde (encore moins que les autres).

Ce que tu veux dire, c'est que tu as été clair sur le fait que cela représentait mathématiquement à un instant t (le présent) le passé, non?

L'espérance de vie pour l'ensemble des a change à tout instant t (ou t+1, chaque t est le t-1 d'un autre de toute façon), et pour voir l'évolution de celle ci, il faut, si mes quelques maigres souvenirs en maths ne sont pas trop loin, une intégrale double (avec un dt à la fin). De plus, a étant aussi fonction de t, la prise en compte de a un impact double (D'un coté, les gens à a à un instant t, sont à A+1 à t+1, mais en plus, les changements sanitaires, socio-économiques, médicaux, entre t et t+1 influent aussi).

Graphiquement parlant, ça se représente par une surface, avec z fonction du temps.

Merci de me corriger (avec explications) si je dis une connerie. J'ai trouvé ton explication bonne et aimerait confirmer le fait d'avoir pigé, moi qui ne suit pas super branché stats… (Alenvers, au passage, concernant le concept d'espérance mathématique tu as le mérite de remettre à certains, dont je fais partie (j'espère!), le cerveau à l'endroit!)

One thing you should consider for limiting the impact of the monthly quota is to check if the provider has an offer allowing you to connect to wifi for free in public spaces. Maybe free offers something like this.

Rah je l'ai loupé! Merci!

Merci (pour les autres)! Je n'édite mon message puisque ce n'est plus possible, mais l'intention y est.

En voila une bonne question! Et pourquoi ne figure pas celui-ci ?

Sur-ce, 失礼します。。。

En espérant qu'il fasse une bonne couverture des bières de la brasserie de Saverne!

Ta blague est digne d'un m'aqueux (elle tombe a l'eau).

OK!! Je plonge! Oui! Tout de suite!