ru.unix
- RU.UNIX ----------------------------------------------------------------------
From : Igor Nikolaev 2:5030/266 30 Aug 2000 04:41:08
To : Vlad
Subject : Re: Как переименовать группу файлов?
--------------------------------------------------------------------------------
Vlad <Vlad@p3.f61.n5005.z2.fidonet.org> wrote:
> есть такая маленькая программка - mmv - multifile mv
Вообще-то где-то в перловых faq есть нечто такое:
% cat /usr/local/bin/rename
#!/usr/bin/perl -w
use strict;
my $expr = shift or die "Usage: $0 perlexpr [filenames]\n";
chomp ( @ARGV = <STDIN> ) unless @ARGV;
foreach ( @ARGV ) {
my $file = $_; eval $expr; die $@ if $@;
rename $file, $_ or print "$!: $file\n" unless -e $_ or $file eq $_ ;
}
А скриптописание на shell действительно imho нонче не
имеет глубокого смысла. Hу разве что по быстрому пару
команд в цикл загнать или работать *свои* файлы.
--
Игорь Hиколаев
--- ifmail v.2.12.os.sensi
* Origin: А что там под оболочкой? (2:5030/266@fidonet)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
