|
ru.unix.bsd
- RU.UNIX.BSD ------------------------------------------------------------------
From : Maxim Tulyuk 2:5020/400 25 Mar 2001 04:44:30
To : All
Subject : Re: Переименование кучи файлов средствами shell]
--------------------------------------------------------------------------------
Alex Masterov <Alex.Masterov@f63.n5002.z2.fidonet.org> wrote:
> Привет !
> Довольно часто требуется произвести следующую операцию: переименовать все
> файлы подходящие под один шаблон (например *.txt) в файлы подходящие под
> другой (например *.bak). Другими словами, если у меня есть 100 файлов с
> расширением .txt, а я хочу, чтобы все они стали с расширением .bak В досе
> можно просто подать команду ren *.txt *.bak
rename имени unix tools:
#!/usr/bin/perl
# Usage: rename perlexpr [files]
($op = shift) || die "Usage: rename perlexpr [filenames]\n";
if (!@ARGV) {
@ARGV = <STDIN>;
chop(@ARGV);
}
for (@ARGV) {
$was = $_;
eval $op;
die $@ if $@;
rename($was,$_) unless $was eq $_;
}
--
bye, Max
--- ifmail v.2.15dev5
* Origin: Unknown (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
