Re: Rename multiple files at once

Pieter Verberne(pieterverberne <at> xs4all.nl) on 2007.06.27 14:37:07 +0000:
> Hi there,
>
> How do I rename multiple files at once? I want to rename a list of
> files like:
>
> man mv(1) says nothing about REGEX. (although I don't know REGEX
> (yet))

I like this one, from the Perl Cookbook, Chap. 9.9.

#!/usr/bin/perl -w
# rename - Larry's filename fixer
$op = shift or die "Usage: rename expr [files]\n";
chomp(@ARGV = <STDIN>) unless @ARGV;
for (@ARGV) {
    $was = $_;
    eval $op;
    die $@ if $@;
    rename($was,$_) unless $was eq $_;
}

To do your rename:

file.jpg
file1.jpg
file_2.jpg

to:

file_thumb.jpg
file1_thumb.jpg
file_2_thumb.jpg

you could then do

 rename 's/\.jpg/_thumb.jpg/' file.jpg file1.jpg file_2.jpg

The first argument of this rename command can be any valid perl expression


/B.
--
Sebastian Benoit <benoit-lists <at> fb12.de>

Gegen Krisen kann keiner was!
Unverr|ckbar |ber uns; Stehen die Gesetze der Wirtschaft, unbekannte;
Wiederkehren in furchtbaren Zyklen; Katastrophen der Natur.
-- Berthold Brecht, Hl. Johanna der Schlachthvfe

[demime 1.01d removed an attachment of type application/pgp-signature]