Можно ли массово переименовать названия файлов?

+1

find . | while read a; do gzip $a; done

как вариант - он тебе еще их и загзипует:)

#!/usr/local/bin/perl

foreach(<*>) {
$old = $_;
s/name/surname/;
rename $old $_;
}

Эээ.... А переименует ли?

еще курить сюда
http://www.softpanorama.org/Scripting/Perl...ne_liners.shtml

Ден, ну так не совсем верно делать если файлов много. Шеловские конструкции типа * тоже имеют определенные ограничения, в том числе и на длину получившейся после подстановки строки. Так что тут наверно правильно пользовать find с опцией -exec.

а для зануд пишу:
for name in `find file* | xargs -n 1000` ; do mv $name prefix_$name ; done


)))

Зануды считают, что вместо file* надо писать file\*
и for нафиг не нужен ибо, как написано выше есть -exec :-)