Renomear arquivos e diretórios (adicionar prefixo)

Eu gostaria de adicionar prefixo em todas as pastas e diretórios.

Exemplo:

eu tenho

Hi.jpg
1.txt
folder/
this.file_is.here.png
another_folder.ok/

Eu gostaria de adicionar o prefixo "PRE_"

PRE_Hi.jpg
PRE_1.txt
PRE_folder/
PRE_this.file_is.here.png
PRE_another_folder.ok/

Saudações,

Graças a Peter van der Heijden , aqui está um que funcionará para nomes de arquivos com espaços:

for f in * ; do mv -- "$f" "PRE_$f" ; done

("-" é necessário para ter sucesso com arquivos que começam com traços, cujos nomes seriam interpretados como opções para o comando mv)

Use o script de renomeação desta maneira:

$ rename 's/^/PRE_/' *

Não há problemas com metacaracteres ou espaços em branco nos nomes de arquivos.

Para adicionar prefixo ou sufixo para arquivos (diretórios), você pode usar a maneira simples e poderosa do xargs :

ls | xargs -I {} mv {} PRE_{}

ls | xargs -I {} mv {} {}_SUF

Ele está usando a opção de substituição de parâmetro de xargs: -I. E você pode obter mais detalhes na página de manual.

Isso pode ser feito executando um findcomando simples :

find * -maxdepth 0 -exec mv {} PRE_{} \;

O comando acima prefixará todos os arquivos e pastas no diretório atual com PRE_.

Para adicionar um prefixo a todos os arquivos e pastas no diretório atual usando util-linux's rename(ao contrário prenameda variante perl do Debian e de outros sistemas), você pode:

rename '' <prefix> *

Ele localiza a primeira ocorrência da sequência vazia (que é encontrada imediatamente) e, em seguida, substitui a ocorrência pelo seu prefixo e cola no restante do nome do arquivo até o final. Feito.

Para sufixos , você precisa usar a versão perl ou usar find .

Se você tem Ruby (1.9+)

ruby -e 'Dir["*"].each{|x| File.rename(x,"PRE_"+x) }'

com Perl:

perl -e 'rename $_, "PRE_$_" for <*>'

Aqui está um script simples que você pode usar. Eu gosto de usar o módulo não-padrão File::chdirpara lidar com cdoperações de gerenciamento ; portanto, para usar esse script como está, será necessário instalá-lo ( 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: $!";
}

No meu sistema, não tenho o renamecomando. Aqui está um forro simples. Ele encontra todos os arquivos HTML recursivamente e adiciona prefix_na frente de seus nomes:

for f in $(find . -name '*.html'); do mv "$f" "$(dirname "$f")/prefix_$(basename "$f")"; done

Isso irá prefixar seus arquivos no diretório deles.

O ${f%/*}é o caminho até a última barra /-> o diretório

o ${f##*/} é o texto sem nada antes última barra /-> nome do arquivo sem o caminho

Então é assim:

for f in $(find /directory/ -type f); do 
  mv -v $f ${f%/*}/$(date +%Y%m%d)_Prefix_${f##*/}
done