je me suis tromp�...

#!/usr/bin/perl
#


$file="/tmp/file.file";
$expr="zsnes";
$motif="%-%";

open FILE, $file || die "quel fichier ?";
$d="debut";
while (<FILE>) {
        $d.=$_;
        if ( $d =~ /$motif/) {
                $d=~s/$motif//g;
                if ($d =~ /$expr/) {
                        print $d;
                };
                $d = "";
        };
};
close FILE;






On Mon, 12 Nov 2001 [EMAIL PROTECTED] wrote:

>
> Essaies �a
> Je pense que �a devrait faire l'affaire m�me si �a v�rifie pas les "-"
> On voit rarement des lignes avec deux fois ':' (?)
> Si �a vas pas tu peux rajouter un ':' en rempla�ant l'expression :.*: par
> :.*:.*:
>
>
> #!/usr/bin/perl
> #
>
> open FILE, "/tmp/fichier.file" || die "c'est quel fichier � traiter?";
> while (<FILE>) {
>         if ($_ =~ /:.*:/) {
>               split /:/;
>               print @_[0], "\n";
>               };
>       };
> close FILE;
>
>
>
>
>
>
> >                     Salut,
> >
> > bon les gars c'est un truc assez compliqu�.
> > Soit un programme dont la sortie est quelquechose du genre :
> > %-%
> > nom:description:texte
> > %-%
> > %-%
> > nom:description:texte
> > %-%
> >
> > je voudrais r�cup�rer nom si et seulement si texte contient un motif que
> > l'on va apell� motif.
> > Pour cela je suis limit� � 2 outils : perl et grep.
> > Note je peux utiliser un script ou une longue ligne perl.
> >
> > J'avais pens� � ne proc�dure et je voudrais savoir si c'est possible :
> > d'abord faire perl couper entre les %-%, puis faire grep motif sur cette
> > partie extraite, si grep renvoie r�ponse positive alors couper et
> > renvoyer que le champ 1 ( $1 ) qui contient nom ou alors tout le texte.
> > donc en gros un traitement qui s'applique sur les blocks compris entre
> > %-% et %-%.
> >
> > je vais donner un exemple partique :
> >
> > [will@bastard rpmtools]$ ./parsehdlist --description
> > /var/lib/urpmi/hdlist.contrib.cz
> > [...]
> > %-%
> > zebra:description:GNU Zebra is a free software that manages TCP/IP based
> > routing
> > protocol.  It takes multi-server and multi-thread approach to resolve
> > the current complexity of the Internet.
> >
> > GNU Zebra supports BGP4, BGP4+, OSPFv2, OSPFv3, RIPv1, RIPv2, and RIPng.
> >
> > GNU Zebra is intended to be used as a Route Server and a Route
> > Reflector.
> > It is not a toolkit, it provides full routing power under a new
> > architecture. GNU Zebra is unique in design in that it has a process
> > for each protocol.
> >
> > See the file INSTALL for building and installation instructions.
> >
> > Please send all bug reports by electronic mail to: [EMAIL PROTECTED]
> > %-%
> > %-%
> > ziptool:description:Medium protection is done by software for Iomega's
> > JAZ and ZIP drives.
> > jaztool and ziptool make this features available for Linux.
> > %-%
> > %-%
> > zloe:description:An action-packed battle to the death that puts to the
> > test the players'
> > skill, cunning and reflexes, in a soul-wrenching, nerve-wracking,
> > blood-chilling colliseum of evil.
> > %-%
> > %-%
> > zsnes:description:This is an emulator for Nintendo's 16 bit console,
> > called Super Nintendo
> > Entertainment System or Super Famicom. It features a pretty accurate
> > emulation
> > of that system's graphic and sound capabilities.
> > The GUI enables the user to select games, change options, enable cheat
> > codes
> > and to save the game state, even network play is possible.
> > %-%
> > %-%
> > zssh:description:zssh (Zmodem SSH) is a program for interactively
> > transferring files to/from
> > a remote machine while using the secure shell (ssh). It is intended to
> > be a
> > convenient alternative to scp, allowing to transfer files without having
> > to
> > open another  session and re-authenticate  oneself. zssh is  an
> > interactive
> > wrapper for ssh used to switch  the ssh connection between the remote
> > shell
> > and  file transfers.  Files are  transferred through  the  zmodem
> > protocol,
> > using the rz and sz commands.
> > %-%
> >
> > sortie non filtr�e. maintenant la sortie filtr� devrait me renvoy� au
> > choix soit pour motif = protocol :
> >
> > zebra
> > zssh
> >
> > ou soit :
> > zebra:description:GNU Zebra is a free software that manages TCP/IP based
> > routing
> > protocol.  It takes multi-server and multi-thread approach to resolve
> > the current complexity of the Internet.
> >
> > GNU Zebra supports BGP4, BGP4+, OSPFv2, OSPFv3, RIPv1, RIPv2, and RIPng.
> >
> > GNU Zebra is intended to be used as a Route Server and a Route
> > Reflector.
> > It is not a toolkit, it provides full routing power under a new
> > architecture. GNU Zebra is unique in design in that it has a process
> > for each protocol.
> >
> > See the file INSTALL for building and installation instructions.
> >
> > Please send all bug reports by electronic mail to: [EMAIL PROTECTED]
> >
> > zssh:description:zssh (Zmodem SSH) is a program for interactively
> > transferring files to/from
> > a remote machine while using the secure shell (ssh). It is intended to
> > be a
> > convenient alternative to scp, allowing to transfer files without having
> > to
> > open another  session and re-authenticate  oneself. zssh is  an
> > interactive
> > wrapper for ssh used to switch  the ssh connection between the remote
> > shell
> > and  file transfers.  Files are  transferred through  the  zmodem
> > protocol,
> > using the rz and sz commands.
> >
> >
> > Bon comme vous l'aurez compris c'est pour un outils de mandrake ( urpmf
> > ) qui pose probl�me. J'ai essay� de voir d'o�venait le probl�me
> > malheureusement je n'y connait rien en perl ( j'apprend depuis le man )
> > et je ne suis pas tr�s fort en expression r�guli�re.
> > Si quelqu'un trouve la r�ponse et que le changement est accept� dans le
> > CVS de mandrakesoft, c'est s�r que je cite son nom dans mon entr�e CVS
> > avec un gros merci ( de l� � savoir si cela apparaitra au changelog de
> > la prochaine .... ).
> >
> >
>
>

-- 
Thomas Nagy

DYSLEXICS OF THE WORLD, UNTIE!


Vous souhaitez acquerir votre Pack ou des Services MandrakeSoft?
Rendez-vous sur "http://www.mandrakestore.com";

Répondre à