Question

我有随机名称的文件，我想将它们重命名为Trace1，Trace2等等......任何想法？

Answer 1

或者在Perl中：

#!/usr/bin/perl
use strict;
use warnings;

# use dirname() to keep the renamed files in the same directory
use File::Basename qw( dirname );

my $i = 1;
for my $file (@ARGV) {
    rename $file, dirname($file) . "/Trace$i"; 
    print "$file -> Trace$i\n";
} continue { $i++ }

如果您不熟悉Linux，还需要记住使脚本可执行（假设脚本保存在名为random-renamer的文件中）：

chmod 755 random-renamer

然后运行它（重命名random-files目录中的所有文件）：

./random-renamer random-files/*

Answer 2

您可以使用shell命令：

i=1;
for f in *
do
    mv $f "Trace$i"
    i=$(($i+1))
done

Answer 3

检查是否存在名为Trace#的现有文件，并避免破坏它们。

use Path::Class qw( dir );
use List::Util  qw( max );

my $dir = dir(...);

my @files =
   map $_->basename(),
    grep !$_->is_dir(),
     $dir->children();

my $last =
   max 0,
    map /^Trace([0-9]+)\z/,
     @files;

my $errors;
for (@files) {
   my $old = $dir->file($_);
   my $new = $dir->file("Trace" . ++$last);
   if (!rename($new, $old)) {
      warn("Can't rename \"$old\" to \"$new\": $!\n");
      ++$errors;
   }
}

exit($errors ? 1 : 0);

如何使用随机名称重命名多个文件

3 个答案: