Python实例31[批量对目录下文件重命名]
来源:互联网 发布:java虚拟机是什么 编辑:程序博客网 时间:2024/05/10 01:08
经常会遇到下载的文件或电子书,名字中间都包含了一些网址信息,实际使用中由于名字太长不方便,下面的脚本使用正则表达式来对目录下的所有文件重命名:
例如:
修改前:[大家网]Mac OS X for Unix Geeks[www.TopSage.com].mobi
修改后:Mac OS X for Unix Geeks.mobi
修改后:Mac OS X for Unix Geeks.mobi
python代码如下
import os
import re
def rename_dir(dir,regex,f):
if not os.path.isdir(dir) or not os.path.exists(dir) :
print("The input is not one directory or not exist.")
for root,subdirs,files in os.walk(dir):
for name in files:
oldname = name
newname = re.sub(regex,f,name)
print("Before : " + os.path.join(root,oldname))
print("After : " + os.path.join(root,newname))
if not name == newname and not os.path.exists(os.path.join(root,newname)):
os.rename(os.path.join(root,oldname),os.path.join(root,newname))
for dir in subdirs:
rename_dir(os.path.join(root,dir))
rename_dir("C:\\Python31\\test","\[.*\](.*)\[www.TopSage.com\](.*)",lambda m:m.group(1)+m.group(2))
import re
def rename_dir(dir,regex,f):
if not os.path.isdir(dir) or not os.path.exists(dir) :
print("The input is not one directory or not exist.")
for root,subdirs,files in os.walk(dir):
for name in files:
oldname = name
newname = re.sub(regex,f,name)
print("Before : " + os.path.join(root,oldname))
print("After : " + os.path.join(root,newname))
if not name == newname and not os.path.exists(os.path.join(root,newname)):
os.rename(os.path.join(root,oldname),os.path.join(root,newname))
for dir in subdirs:
rename_dir(os.path.join(root,dir))
rename_dir("C:\\Python31\\test","\[.*\](.*)\[www.TopSage.com\](.*)",lambda m:m.group(1)+m.group(2))
用perl写了下,感觉代码也没有少写多少
use strict;
use warnings;
use File::Find;
my $regex = "\\[.*\\](.*)\\[www.TopSage.com\\](.*)";
# $replace doesn't work
my $replace = "\$1\$2";
sub wanted {
my $name = $File::Find::name;
if( -f $name){
my $newname =$name;
$newname =~ s/$regex/$1$2/;
print "Before: $File::Find::name\n";
print "After : $newname\n";
if( !-e $newname) {
rename($name, $newname);
}
}
}
sub rename_dir{
my ($dir,) = @_;
if (!-d $dir || !-e $dir){
print"The input is not directory or not exist.";
}
find(\&wanted, $dir);
}
&rename_dir("c:\\perl\\test");
use warnings;
use File::Find;
my $regex = "\\[.*\\](.*)\\[www.TopSage.com\\](.*)";
# $replace doesn't work
my $replace = "\$1\$2";
sub wanted {
my $name = $File::Find::name;
if( -f $name){
my $newname =$name;
$newname =~ s/$regex/$1$2/;
print "Before: $File::Find::name\n";
print "After : $newname\n";
if( !-e $newname) {
rename($name, $newname);
}
}
}
sub rename_dir{
my ($dir,) = @_;
if (!-d $dir || !-e $dir){
print"The input is not directory or not exist.";
}
find(\&wanted, $dir);
}
&rename_dir("c:\\perl\\test");
perl 实现2
use strict;
use warnings;
my $regex = "\\[.*\\](.*)\\[www.TopSage.com\\](.*)";
# $replace doesn't work
my $replace = "\$1\$2";
sub rename_dir{
my $dir = shift;
if (!-d $dir || !-e $dir){
print"The input is not directory or not exist.";
}
opendir(DIR, $dir) || die "Cannot opendir $dir.";
foreach (readdir(DIR)) {
if ($_ eq '.' || $_ eq '..') {next;}
my $name = $dir.'/'.$_;
if(-d $name){
rename_dir($name);
next;
}
my $newname =$_;
$newname =~ s/$regex/$1$2/;
$newname = $dir.'/'.$newname;
print "Before : $name\n";
print "After : $newname\n";
rename($name,$newname);
}
#closedir(DIR);
}
&rename_dir("c:\\perl\\test");
use warnings;
my $regex = "\\[.*\\](.*)\\[www.TopSage.com\\](.*)";
# $replace doesn't work
my $replace = "\$1\$2";
sub rename_dir{
my $dir = shift;
if (!-d $dir || !-e $dir){
print"The input is not directory or not exist.";
}
opendir(DIR, $dir) || die "Cannot opendir $dir.";
foreach (readdir(DIR)) {
if ($_ eq '.' || $_ eq '..') {next;}
my $name = $dir.'/'.$_;
if(-d $name){
rename_dir($name);
next;
}
my $newname =$_;
$newname =~ s/$regex/$1$2/;
$newname = $dir.'/'.$newname;
print "Before : $name\n";
print "After : $newname\n";
rename($name,$newname);
}
#closedir(DIR);
}
&rename_dir("c:\\perl\\test");
完!
- Python实例31[批量对目录下文件重命名]
- Python批量对目录下文件重命名
- 目录下文件重命名
- Python 脚本 批量删除目录下文件的特定内容
- Python批量重命名指定文件夹下文件的两种方法
- 用python 重命名文件夹下文件
- python 显示目录下文件
- python 遍历目录下文件
- 批量编译目录下文件的Makefile
- python下文件的批量复制
- python获取文件后缀名及批量更新目录下文件后缀名的方法
- php 获取目录下文件 批量改名 批量插入数据库
- python 获取当前目录下文件
- python 获取目录下文件(转)
- python之批量重命名目录文件
- python 对某目录下部分文件通过重命名打乱顺序
- Python对文件进行批量随机重命名
- Python对文件进行批量随机重命名
- perl模块安装自定义路径和使用
- 关于gcc、glibc和binutils模块之间的关系
- Linux进程的uid和euid
- Linux任务前后台的切换
- Perforce查看workspace sync到的changlist
- Python实例31[批量对目录下文件重命名]
- 漂亮的HTML表格
- JavaEE学习笔记——2、Hibernate cfg参数设置一览表
- 比较perl+python
- Linux的inode的理解
- 内存虚拟硬盘
- 硬盘声音大win7系统优化
- DIY新电脑
- 开源重复数据删除软件