UNIX 상에서 파일의 부분 변경하는 법을 가르쳐 주시면 감사하겠

여러번 사용하실거면 쉘스크립트로 만드시면 좋을 듯 한데
한번만 할거라면
# ls | vi -

하신다음
vi 안에서

%s/cus_\([0-9]*\).txt/mv \0 VIP_\1.txt/g

이런식으로 정규표현식을 이용한 replace 를 하시면 되겠네요.
이런식으로 mv 명령을 만든 다음

:wrename.sh

로 해서 rename.sh 파일로 저장후

# chmod 755 rename.sh

를 해서 실행 권한을 준후에

# ./rename.sh

를 해서 실행하면 되겠네요.

http://bbs.kldp.org/viewtopic.php?p=138696#138696

rename 's/cus/VIP/' *.txt

#!/usr/bin/perl -w
#
#  This script was developed by Robin Barker (Robin.Barker@npl.co.uk),
#  from Larry Wall's original script eg/rename from the perl source.
#
#  This script is free software; you can redistribute it and/or modify it
#  under the same terms as Perl itself.
#

use strict;

use Getopt::Long;
Getopt::Long::Configure('bundling');

my ($verbose, $no_act, $force, $op);

die "Usage: rename [-v] [-n] [-f] perlexpr [filenames]\n"
    unless GetOptions(
    'v|verbose' => \$verbose,
    'n|no-act'  => \$no_act,
    'f|force'   => \$force,
    ) and $op = shift;

$verbose++ if $no_act;

if (!@ARGV) {
    print "reading filenames from STDIN\n" if $verbose;
    @ARGV = <STDIN>;
    chop(@ARGV);
}

for (@ARGV) {
    my $was = $_;
    eval $op;
    die $@ if $@;
    next if $was eq $_; # ignore quietly
    if (-e $_ and !$force)
    {
    warn  "$was not renamed: $_ already exists\n";
    }
    elsif ($no_act or rename $was, $_)
    {
    print "$was renamed as $_\n" if $verbose;
    }
    else
    {
    warn  "Can't rename $was $_: $!\n";
    }
}

for I in `seq -w 1000` ; do mv cus_$I.txt VIP_$I.txt ; done

`는 backtick입니다. 1 왼쪽에 있는 문자요.