Я хотел бы добавить префикс для всех папок и каталогов.
Пример:
У меня
Hi.jpg
1.txt
folder/
this.file_is.here.png
another_folder.ok/
Я бы хотел добавить префикс "PRE _"
PRE_Hi.jpg
PRE_1.txt
PRE_folder/
PRE_this.file_is.here.png
PRE_another_folder.ok/
Привет,
Благодаря Peter van der Heijden, здесь, который будет работать с именами файлов с пробелами в них:
for f in * ; do mv "$f" "PRE_$f" ; done
Используйте переименование script следующим образом:
$ rename 's/^/PRE_/' *
Нет проблем с метасимволами или пробелами в именах файлов.
rename
всегда помогало мне легко справляться с несколькими переименованиями файлов.
Для добавления префикса или суффикса для файлов (каталогов) вы можете использовать простой и мощный способ xargs:
ls | xargs -I {} mv {} PRE_{}
ls | xargs -I {} mv {} {}_SUF
Он использует параметр замены параметра xargs: -I. И вы можете получить более подробную информацию на странице руководства.
ls *.old | xargs -I {} mv {} PRE_{}
Это можно сделать, выполнив простую команду find
:
find * -maxdepth 0 ! -path . -exec mv {} PRE_{} \;
Приведенная выше команда будет префикс всех файлов и папок в текущем каталоге PRE_
.
Чтобы добавить префикс ко всем файлам и папкам в текущем каталоге, используя util-linux rename
(в отличие от prename
, Perl-вариант от Debian и некоторых других систем), вы можете сделать:
rename '' <prefix> *
Это находит первое вхождение пустой строки (которая найдена сразу), а затем заменяет это вхождение вашим префиксом, а затем наклеивает остальную часть имени файла до конца. Готово.
Для суффиксов вам нужно использовать версию perl или использовать поиск.
util-linux
в Debian Stretch, по-видимому, предоставляет это как /usr/bin/rename.ul
.
с Perl:
perl -e 'rename $_, "PRE_$_" for <*>'
Если у вас есть Ruby (1.9 +)
ruby -e 'Dir["*"].each{|x| File.rename(x,"PRE_"+x) }'
Вот простой script, который вы можете использовать. Мне нравится использовать нестандартный модуль File::chdir
для управления управляющими операциями cd
, поэтому для использования этого script as-it вам потребуется его установить (sudo cpan File::chdir
).
#!/usr/bin/perl
use strict;
use warnings;
use File::Copy;
use File::chdir; # allows cd-ing by use of $CWD, much easier but needs CPAN module
die "Usage: $0 dir prefix" unless (@ARGV >= 2);
my ($dir, $pre) = @ARGV;
opendir(my $dir_handle, $dir) or die "Cannot open directory $dir";
my @files = readdir($dir_handle);
close($dir_handle);
$CWD = $dir; # cd to the directory, needs File::chdir
foreach my $file (@files) {
next if ($file =~ /^\.+$/); # avoid folders . and ..
next if ($0 =~ /$file/); # avoid moving this script if it is in the directory
move($file, $pre . $file) or warn "Cannot rename file $file: $!";
}
В моей системе у меня нет команды rename
. Вот простой лайнер. Он находит все файлы HTML рекурсивно и добавляет prefix_
перед их именами:
for f in $(find . -name '*.html'); do mv "$f" "$(dirname "$f")/prefix_$(basename "$f")"; done
find
вы также можете выполнять команды, без необходимости в цикле: stackoverflow.com/a/33297439/2351568