On [02-07-2004] 21:49 +0300, [EMAIL PROTECTED] wrote:
-> Hi
->
-> Vreau sa redenumesc mai multe fisiere deodata cara contin spatii.
-> Chestia e ca vreau sa folosesc cit mai putine comenzi pentru ca scriptul
-> sa fie cit mai portabil (deci exclus perl) si sa ruleze intr-un shell
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
Excuse me ?
Prolly nu raspundeam, dar verifica intai pe cate arhitecturi/sisteme
e perl si pe cate e shell posix.
Here ya go:
find2perl . -depth -eval 'my $f=$_; -f and tr/ /_/; -e or rename $f,$_' |perl
[:evilgrin:]
-> posix (ca sa-l pot rula si de pe MKS korn shell de ex.)
->
-> Vreo idee ?
-> Pe google e liniste.
-> Tot ce am gasit pe google se referea la schimbarea extensiei sau
-> presupunea ca fisierele au fost facute de un utilizator educat de unix
-> (i.e. care nu foloseste toate caracterele din setul unicode pentru nume
-> de fisiere)
->
-> Thanks
->
-> Bye
-> Calin
--
perl -MLWP::Simple -e'print$_[rand(split(q|%%\n|,
get(q=http://cpan.org/misc/japh=)))]'
---
Detalii despre listele noastre de mail: http://www.lug.ro/