Đổi tên tệp và thư mục (Thêm tiền tố)

Tôi muốn thêm tiền tố vào tất cả các thư mục và thư mục.

Thí dụ:

Tôi có

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

Tôi muốn thêm tiền tố "PRE_"

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

Trân trọng,

Cảm ơn Peter van der Heijden , đây là một cái sẽ hoạt động cho tên tập tin có không gian trong đó:

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

("-" là cần thiết để thành công với các tệp bắt đầu bằng dấu gạch ngang, có tên khác được hiểu là các công tắc cho lệnh mv)

Sử dụng các đổi tên kịch bản theo cách này:

$ rename 's/^/PRE_/' *

Không có vấn đề với siêu nhân vật hoặc khoảng trắng trong tên tệp.

Để thêm tiền tố hoặc hậu tố cho các tệp (thư mục), bạn có thể sử dụng cách đơn giản và mạnh mẽ của xargs :

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

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

Nó đang sử dụng tùy chọn thay thế paramerter của xargs: -I. Và bạn có thể biết thêm chi tiết từ trang người đàn ông.

Điều này có thể được thực hiện bằng cách chạy một findlệnh đơn giản :

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

Lệnh trên sẽ tiền tố tất cả các tệp và thư mục trong thư mục hiện tại với PRE_.

Để thêm tiền tố vào tất cả các tệp và thư mục trong thư mục hiện tại bằng cách sử dụng linux-linux rename(trái ngược với prenamebiến thể perl từ Debian và một số hệ thống khác), bạn có thể làm:

rename '' <prefix> *

Điều này tìm thấy sự xuất hiện đầu tiên của chuỗi trống (được tìm thấy ngay lập tức) và sau đó thay thế sự xuất hiện đó bằng tiền tố của bạn, sau đó dán vào phần còn lại của tên tệp vào cuối chuỗi đó. Làm xong.

Đối với hậu tố , bạn cần sử dụng phiên bản perl hoặc sử dụng find .

Nếu bạn có Ruby (1.9+)

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

với Perl:

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

Đây là một kịch bản đơn giản mà bạn có thể sử dụng. Tôi thích sử dụng mô-đun không chuẩn File::chdirđể xử lý các cdhoạt động quản lý , vì vậy để sử dụng tập lệnh này như là bạn sẽ cần phải cài đặt nó ( 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: $!";
}

Trên hệ thống của tôi, tôi không có renamelệnh. Đây là một lót đơn giản. Nó tìm thấy tất cả các tệp HTML theo cách đệ quy và thêm prefix_vào trước tên của chúng:

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

Điều này sẽ tiền tố các tập tin của bạn trong thư mục của họ.

Các ${f%/*}là con đường cho đến khi dấu gạch chéo cuối cùng /-> thư mục

Các ${f##*/}là nội dung mà không cần bất cứ điều gì trước khi dấu gạch chéo cuối cùng /-> filename mà không có con đường

Vì vậy, đó là cách nó đi:

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