[lx-files]qui pourrait me rendre un service en m'écrivant un script ?

qui pourrait me rendre un service en m'écrivant un script ? [lx-files] - Linux et OS Alternatifs

Marsh Posté le 09-01-2002 à 13:39:42    

j'aurais besoin d'un script, qui, dans un repertoire donné, m'efface tous les fichiers sauf le dernier (dans l'ordre lexicographique) qu'on obtient avec un ls.
 
merci d'avance :jap:
 
ps: si je me permets de demander, c'est parce que je pense que ca ne doit pas etre trop dur pour une personne maitrisant linux un minimum.

Reply

Marsh Posté le 09-01-2002 à 13:39:42   

Reply

Marsh Posté le 09-01-2002 à 13:48:03    

heu...
 
perl -e '@list = qx/'ls'/ and pop @list and exec "rm @list";'
 
ça devrait marcher...

Reply

Marsh Posté le 09-01-2002 à 13:52:04    

ca efface le premier fichier, mais pas les n-2 suivants (en fait ca fait: rm file1, file2,...filen-1, d'où des commandes inconnues après le premier rm)
 
mais c'est presque ca; faudra que je me documente sur le perl un jour, car ca a vraiment trop l'air pratique.

Reply

Marsh Posté le 09-01-2002 à 13:54:55    

qd tu fais exec "rm @list" en fait ca fait pas un rm sur l'ensemble des elements de la liste, mais ca ecrit betement dans le sh le "rm" suivi des n elements de la liste.
Y a pas une fonction perl qui mape une fonction sur l'ensemble des elements d'une liste ?

Reply

Marsh Posté le 09-01-2002 à 14:06:33    

minusplus> tu ne sais pas corriger ton script ?

Reply

Marsh Posté le 09-01-2002 à 14:07:39    

heu...
 
(bon c crade, hein ! :D)
 
perl -e '@list = qx/'ls'/ and pop @list and chomp @list and $truc = join " ", @list and exec "rm $truc";'
 
 
:/ :D

Reply

Marsh Posté le 09-01-2002 à 14:11:18    

ok je teste :D
ben c pas grave, je m'en fous que ca soit crade :D

Reply

Marsh Posté le 09-01-2002 à 14:12:36    

c'est parfait

Reply

Marsh Posté le 09-01-2002 à 14:13:29    

:sol:

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed