Attention:tar为目标路径,指src下面的目录结构将被复制到的地方
The Goal:在指定目录下创建和当前目录一样的文档结构,可以选择复制子目录结构或者不复制子目录结构。
require 'rubygems'
require 'ruby-debug'
require "find"
module Cz_dirtools
def mkdirs_to(tar,src=Dir.getwd)
#debugger
if tar.class==NilClass then
puts "PLZ input target directory name..."
return
elsif !FileTest.directory?(tar)#如果tar不是一个目录
puts ("Creating #{File.expand_path(tar)}")
Dir.mkdir("#{File.expand_path(tar)}")#创建tar目录
end
src=if FileTest.directory?(src) then
src#如果src是一个目录名,则返回自身
else
File.dirname(src)#如果src为一个文件名,则返回该文件所在目录
end
#Dir.foreach可以复制目标路径第一层目录结构而不复制子目录
#~ Dir.foreach(src) do |dir|
#~ if FileTest.directory?(dir) && dir!=tar && dir!='..' &&dir!='.' then #忽略自身,忽略上级目录"..",忽略本级目录"."
#~ #puts dir
#~ begin
#~ Dir.mkdir("#{File.expand_path(tar)}/#{dir}")
#~ rescue#如果该目录已存在则直接跳过否则创建该目录
#~ end
#~ end
#~ end
#Find.find可以复制目标路径的完整目录结构,包括子目录
dirs=Array.new
Find.find(src) do |dir|
unless !FileTest.directory?(dir) || File.basename(dir)==tar || File.basename(dir)=='..' || File.basename(dir)=='.' || File.basename(dir)==File.basename(src)#忽略自身,忽略上级目录"..",忽略本级目录"."
dirs<<dir
end
end
#puts dirs
dirs.each do |dir|
begin
Dir.mkdir("#{File.expand_path(tar)}/#{dir.gsub(src,'')}")
rescue#如果该目录已存在则直接跳过否则创建该目录
end
end
end
end
分享到:
- 2008-03-21 17:12
- 浏览 1331
- 评论(2)
- 论坛回复 / 浏览 (2 / 3875)
- 查看更多
相关推荐
无处不项目-项目管理培训无处不项目-项目管理培训无处不项目-项目管理培训无处不项目-项目管理培训无处不项目-项目管理培训无处不项目-项目管理培训无处不项目-项目管理培训无处不项目-项目管理培训无处不项目-项目...
电脑中毒后很多隐藏文件不能看到,影响杀毒,通过文件夹选项处理后总是被恶意修改回来,很让人恼火。我们知道病毒怎么实现隐藏功能后就能解决这个问题。下面我提供我的解决方案。 第一步: 解压文件 第二步: 在...
1号店:从B2C走到O2O立体化 无处不超市.docx
文件和文件夹彻底粉碎机 更新版,支持文件拖拽 更改文件磁盘扇区内容到**然后擦除,包括目录名称均修改为随机数。无处查询。即使恢复后,文件面目全非!支持右键菜单注册。右键可以注册。支持右键删除!
轻松查到公司局域网内正在使用的IP地址, 让你无处藏身
支持剪切板操作,如果你有想查的IP了,只需把它用鼠标选中,点“复制”或按CTRL+C,本软件会自动进行搜索,免去了“粘贴”的麻烦。软件起动后,会自动停靠在屏幕最上放,并可自动隐藏,完全不会减少屏幕上的可视范围...
“春城无处不飞花,寒食东风御柳斜”的意思.doc
强大的IP端口扫描工具
建材行业2020年投资策略:好云无处不遮楼,渠道变革的降维打击_国泰君安-44页.pdf
无处可微的连续函数+刘文-世界数学名题欣赏丛书
通达信指标公式源码软件大单与资金(一目了然,让庄无处可逃).doc
360顽固木马专杀,让顽固木马无处可逃. 360顽固木马专杀,让顽固木马无处可逃. 360顽固木马专杀,让顽固木马无处可逃. 360顽固木马专杀,让顽固木马无处可逃. 360顽固木马专杀,让顽固木马无处可逃. 360顽固木马专杀,让...
根据IP地址,查找其所在地的功能。支持剪切板操作,自动查找
中国通定位器 让您无处遁逃(带防下空单和重复下单功能).rar
"1、跳出工作细节,以目标驱动的意识主导; 2、全局观、系统性的体会管理过程; 3、提升各种管理能力,尤其是计划力和控制力; 4、掌握平衡的艺术,从“完美”到“满意”。
请放心使用每天专人五小时以上工作量 两年多准备 = 国内最全的IP地址库!集成多种网络工具,更友好的界面,更方便的使用方法,更强大的搜索查询功能。这一切来源于我们不断的努力及您更大的支持!...
一万三的OD插件无处安放的魅力释放(远控)的解决办法 这次我直接发一个去后门的成品吧 也就不多介绍了 无处安放的魅力去后门版!
最强检测后门,让后门无处可逃,功能很强大,可以检测到一切后门病毒,多的不说了,大家自己研究……
六年级语文总复习之排序你无处可逃PPT教案学习.pptx