`

Perl 中的unlink,link,symlink等,处理文件和目录(转)

    博客分类:
  • Perl
阅读更多
删除文件
perl 中用 unlink 操作符删除文件,同 shell rm 命令一样。
unlink "aa","bb","cc";      
把这三个文件删除。

glob 函数结合起来可以一次删除多个文件
unlink glob "*.o";  
删除当前目录下以 .o 结尾的文件,与 rm *.o 相似。

unlink
的返回值告诉我们 有多少文件被成功删除。
my $successful = unlink "aa","bb","cc";
print "I delete $successful   file(s) just now.\n";

如果想知道那个文件被删除,可用循环,一次删除一个文件。
foreach my $file (qw/aa,bb,cc/) {
   unlink $file or warn "failed on $file:$!";
   }

一个很少人知道的有关 unix 的事实。如果你有一个文件,你对它不能读,不能写,不能执 行,甚至文件可能并不属于你,但你仍然可以删除它。这是因为 unlink 一个文件的权限不依赖于文件本身的权限位,起作用的其实是包含这个文件的目录的权限位。只要目录是可写的,就可以删除该目录中不属于 自已的文件。在 unix 中可以通过设置 sticky bit 解这个问题,以保护可写目录。

重命名文件
rename "old","new";
类似于 mv 命令。 rename 失败时返回假,并在 $! 中设置操作系统的错误信息。因此可用 or die or warn 显示给用户。

一个把所有以 .old 结尾的东西 rename 为以 .new 结尾的 perl 程序。
foreach my $file (glob "*.old") {
   my $newfile = $file;
   $newfile =~ s/\.old$/.new/;  
由于 .new 不是模式,所以点号不用加反斜 杠。
   if (-e $newfile) {
       warn "can't rename $file to $newfile:$newfile exists.\n";
   } elsif ( rename $file, $newfile) {
       } else {
           warn "rename $file to $newfile failed:$!\n";
       }
   }

链接和文件
每个文件都被存在一个编了号的 inode 中,每个 inode 都包含一个称为链接计数( link count )的数字,当 inode 没有列在任何目录中时,链接计 数总是 0 ,也就是空,可以分配给文件。当 inode 被加到一个目录中时,链接计数会递增;如果此列表项被删除,链接计数会递减。目录包含 . ,也就是指向自已的 inode ,所以目录的链接计数应该总是 至少为 2 。文件也可以不止一个列表项,如链接文件。在 perl 中用 link "aa","bb" 建立一个指向 aa 的链接 bb 。类似于在 unix shell 一执行 "ln aa bb" 。现在 aa,bb 都有相同的 inode 值,两个文件有相同的大小,相同的内容。在 aa 中加入一行,也会在 bb 中加入一行。如果意外删除了 aa ,数据并不会丢失,可以在 bb 中找回来。反之也一样。但如果两个文件都删除了,则数据就会丢失。

目录列表项中的链接规则
1
一个给定的目录列表项中的 inode 号都指向同一个安装卷上的 inode 。这条规则保证,如果物理媒介 被移到了另一台机器上,所有的目录仍和它们的文件呆在一起。这就是为什么可用 rename 把文件从一个目录移到另一个目录的原因,但两个目录必须在同一个 文件系统(安装卷)中链接不能用于目录。
2
、不能给目录起新的名字。因 此目录不能用于链接。
以上讨论的是硬链接,还有一个符号链接,也叫软链接,能绕过这硬连接的限制。
symlink "aa","bb";
   or warn "cannot symlink aa to bb:$!";
这和 unix shell 中的 "ln -s aa bb" 类似。

要想知道符号链接指向哪里,可以使用 readlin 函数。如果不是符号链接,则返回 undef

两种链接都要以用 unlink 删除。

建立和删除目录
mkdir
函数可以在一个已有 的目录中建立一个目录。返回真时表示成功。
mkdir "aaa",0755 or warn "cannot make aaa directory:$!";
第二个参数是新生成目录的权限位。以 0 开头,这个是一个八进制值。

oct
函数强制对一个字符串按 八进制解释,不论前面有没有 0

删除空目录,可用 rmdir 函数。
rmdir glob "aa/*";  
删除 aa/ 下所有空目录。

rmdir
操作符对非空目录操 作会失败。所以要先用 unlink 删除文件,再删除目录。

修改权限
perl
中有一个 chmod 函数,和 unix shell 中的 chmod 完成类似功能。
chmod 0755, "aa","bb";
perl
中不接受符号权限表达式方式,如 +x,go=u-w 等。

改变所有者
chown
函数可以改变一组文 件的所有者和属组。
chown 1004,100,glob "*.o";
可用 getpwnam 把用户名翻译成一个数字,用 getgrnam 函数把组名翻译成一个数字。

改变时间戳
utime
函数可修改文件的访 问时间和修改时间。
my $now = time;
my $ago = $now -24*60*60;  
每天的秒数
utime $now,$ago,glob "*";  
把访问时间设为现在,修改时间设为一天以前

第三个时间 ctime 的值在对文件做任何改变时,总被设为 现在 ,因此没办法用 utime 函数来设置它。因为在你设置完后它会立即被重置为“现在”,这是因为它的主要目的就是进行增量备份:如果文件的 ctime 比备份磁带上的日期要新,就说 明又需要备份了。

使用简单的模块
File::Basename
模 块    从文件名中抽取基名,取不包括路径的文件名。
通过 use 命令声明一个模块
use File::Basename;
这样,我们就有了一个 basename 函数。
my $name = "/usr/local/bin/perl";
my $basename = basename $name;  
得到 perl
该函数可用于多平台,如 windows

该模块中还有一个 dirname 函数,它把目录名从一个完整文件名中分离出来。

有选择地使用模块中的函数
当你不需要模块中的所有函数,或模块中的函数和你程序中子例程有冲突时,你可以在声明模块时给模块一个引入 列表,只包括需要的函数。
use File::Basename qw /basename/;  
只要 basename 函数,不要其它函数。
use File::Basename qw //;      
不要任何函数。
怎么会想要一个空列表呢?这是因为,有引入只是使得我们能使用短的简单的函数名, basename,dirname 。即使 不引入这些名字,我们仍可以使用,只是在没有引入时,我们要用全名来调用它,如: File::Basename::dirname
每个模块都有缺省的引入列表,查相关文档有介绍。

File::Spec
模块
用来处理文件规范 (file specification) 。它是一个 OO 的模块。用小箭头而不是 :: 来引用函数。 $newname = File::Spec->catfile($dirname,$basename);
分享到:
评论

相关推荐

    SNS单模无芯光纤仿真与传感器结构特性分析——基于Rsoft beamprop模块

    内容概要:本文主要探讨了SNS单模无芯光纤的仿真分析及其在通信和传感领域的应用潜力。首先介绍了模间干涉仿真的重要性,利用Rsoft beamprop模块模拟不同模式光在光纤中的传播情况,进而分析光纤的传输性能和模式特性。接着讨论了光纤传输特性的仿真,包括损耗、色散和模式耦合等参数的评估。随后,文章分析了光纤的结构特性,如折射率分布、包层和纤芯直径对性能的影响,并探讨了镀膜技术对光纤性能的提升作用。最后,进行了变形仿真分析,研究外部因素导致的光纤变形对其性能的影响。通过这些分析,为优化光纤设计提供了理论依据。 适合人群:从事光纤通信、光学工程及相关领域的研究人员和技术人员。 使用场景及目标:适用于需要深入了解SNS单模无芯光纤特性和优化设计的研究项目,旨在提高光纤性能并拓展其应用场景。 其他说明:本文不仅提供了详细的仿真方法和技术细节,还对未来的发展方向进行了展望,强调了SNS单模无芯光纤在未来通信和传感领域的重要地位。

    发那科USM通讯程序socket-rece

    发那科USM通讯程序socket-set

    嵌入式八股文面试题库资料知识宝典-WIFI.zip

    嵌入式八股文面试题库资料知识宝典-WIFI.zip

    JS+HTML源码与image

    源码与image

    物流行业车辆路径优化:基于遗传算法和其他优化算法的MATLAB实现及应用

    内容概要:本文详细探讨了物流行业中路径规划与车辆路径优化(VRP)的问题,特别是针对冷链物流、带时间窗的车辆路径优化(VRPTW)、考虑充电桩的车辆路径优化(EVRP)以及多配送中心情况下的路径优化。文中不仅介绍了遗传算法、蚁群算法、粒子群算法等多种优化算法的理论背景,还提供了完整的MATLAB代码及注释,帮助读者理解这些算法的具体实现。此外,文章还讨论了如何通过MATLAB处理大量数据和复杂计算,以得出最优的路径方案。 适合人群:从事物流行业的研究人员和技术人员,尤其是对路径优化感兴趣的开发者和工程师。 使用场景及目标:适用于需要优化车辆路径的企业和个人,旨在提高配送效率、降低成本、确保按时交付货物。通过学习本文提供的算法和代码,读者可以在实际工作中应用这些优化方法,提升物流系统的性能。 其他说明:为了更好地理解和应用这些算法,建议读者参考相关文献和教程进行深入学习。同时,实际应用中还需根据具体情况进行参数调整和优化。

    嵌入式八股文面试题库资料知识宝典-C and C++ normal interview_8.doc.zip

    嵌入式八股文面试题库资料知识宝典-C and C++ normal interview_8.doc.zip

    基于灰狼优化算法的城市路径规划Matlab实现——解决TSP问题

    内容概要:本文介绍了基于灰狼优化算法(GWO)的城市路径规划优化问题(TSP),并通过Matlab实现了该算法。文章详细解释了GWO算法的工作原理,包括寻找猎物、围捕猎物和攻击猎物三个阶段,并提供了具体的代码示例。通过不断迭代优化路径,最终得到最优的城市路径规划方案。与传统TSP求解方法相比,GWO算法具有更好的全局搜索能力和较快的收敛速度,适用于复杂的城市环境。尽管如此,算法在面对大量城市节点时仍面临运算时间和参数设置的挑战。 适合人群:对路径规划、优化算法感兴趣的科研人员、学生以及从事交通规划的专业人士。 使用场景及目标:①研究和开发高效的路径规划算法;②优化城市交通系统,提升出行效率;③探索人工智能在交通领域的应用。 其他说明:文中提到的代码可以作为学习和研究的基础,但实际应用中需要根据具体情况调整算法参数和优化策略。

    嵌入式八股文面试题库资料知识宝典-Intel3.zip

    嵌入式八股文面试题库资料知识宝典-Intel3.zip

    嵌入式八股文面试题库资料知识宝典-2019京东C++.zip

    嵌入式八股文面试题库资料知识宝典-2019京东C++.zip

    嵌入式八股文面试题库资料知识宝典-北京光桥科技有限公司面试题.zip

    嵌入式八股文面试题库资料知识宝典-北京光桥科技有限公司面试题.zip

    物理学领域十字形声子晶体的能带与传输特性研究及应用

    内容概要:本文详细探讨了十字形声子晶体的能带结构和传输特性。首先介绍了声子晶体作为新型周期性结构在物理学和工程学中的重要地位,特别是十字形声子晶体的独特结构特点。接着从散射体的形状、大小、排列周期等方面分析了其对能带结构的影响,并通过理论计算和仿真获得了能带图。随后讨论了十字形声子晶体的传输特性,即它对声波的调控能力,包括传播速度、模式和能量分布的变化。最后通过大量实验和仿真验证了理论分析的正确性,并得出结论指出散射体的材料、形状和排列方式对其性能有重大影响。 适合人群:从事物理学、材料科学、声学等相关领域的研究人员和技术人员。 使用场景及目标:适用于希望深入了解声子晶体尤其是十字形声子晶体能带与传输特性的科研工作者,旨在为相关领域的创新和发展提供理论支持和技术指导。 其他说明:文中还对未来的研究方向进行了展望,强调了声子晶体在未来多个领域的潜在应用价值。

    嵌入式系统开发_USB主机控制器_Arduino兼容开源硬件_基于Mega32U4和MAX3421E芯片的USB设备扩展开发板_支持多种USB外设接入与控制的通用型嵌入式开发平台_.zip

    嵌入式系统开发_USB主机控制器_Arduino兼容开源硬件_基于Mega32U4和MAX3421E芯片的USB设备扩展开发板_支持多种USB外设接入与控制的通用型嵌入式开发平台_

    e2b8a-main.zip

    e2b8a-main.zip

    少儿编程scratch项目源代码文件案例素材-火柴人跑酷(2).zip

    少儿编程scratch项目源代码文件案例素材-火柴人跑酷(2).zip

    【HarmonyOS分布式技术】远程启动子系统详解:跨设备无缝启动与智能协同的应用场景及未来展望

    内容概要:本文详细介绍了HarmonyOS分布式远程启动子系统,该系统作为HarmonyOS的重要组成部分,旨在打破设备间的界限,实现跨设备无缝启动、智能设备选择和数据同步与连续性等功能。通过分布式软总线和分布式数据管理技术,它能够快速、稳定地实现设备间的通信和数据同步,为用户提供便捷的操作体验。文章还探讨了该系统在智能家居、智能办公和教育等领域的应用场景,展示了其在提升效率和用户体验方面的巨大潜力。最后,文章展望了该系统的未来发展,强调其在技术优化和应用场景拓展上的无限可能性。 适合人群:对HarmonyOS及其分布式技术感兴趣的用户、开发者和行业从业者。 使用场景及目标:①理解HarmonyOS分布式远程启动子系统的工作原理和技术细节;②探索该系统在智能家居、智能办公和教育等领域的具体应用场景;③了解该系统为开发者提供的开发优势和实践要点。 其他说明:本文不仅介绍了HarmonyOS分布式远程启动子系统的核心技术和应用场景,还展望了其未来的发展方向。通过阅读本文,用户可以全面了解该系统如何通过技术创新提升设备间的协同能力和用户体验,为智能生活带来新的变革。

    嵌入式八股文面试题库资料知识宝典-C and C++ normal interview_1.zip

    嵌入式八股文面试题库资料知识宝典-C and C++ normal interview_1.zip

    少儿编程scratch项目源代码文件案例素材-激光反弹.zip

    少儿编程scratch项目源代码文件案例素材-激光反弹.zip

    COMSOL相控阵检测技术在有机玻璃斜楔中检测工件内部缺陷的应用研究

    内容概要:本文详细介绍了COMSOL相控阵检测技术在有机玻璃斜楔上放置16阵元进行工件内部缺陷检测的方法。首先阐述了相控阵检测技术的基本原理,特别是通过控制各阵元的激发时间和相位来实现声波的聚焦和扫描。接着,重点解析了横孔缺陷的反射接收波,解释了波的折射现象及其背后的物理原因。最后,通过实例展示了COMSOL模拟声波传播过程的成功应用,验证了该技术的有效性和准确性。 适合人群:从事固体力学、无损检测领域的研究人员和技术人员,尤其是对相控阵检测技术和COMSOL仿真感兴趣的读者。 使用场景及目标:适用于需要精确检测工件内部缺陷的研究和工业应用场景,旨在提高检测精度和效率,确保产品质量和安全。 其他说明:文中提到的声速匹配现象有助于理解波在不同介质间的传播特性,这对优化检测参数设置有重要意义。

    少儿编程scratch项目源代码文件案例素材-极速奔跑者.zip

    少儿编程scratch项目源代码文件案例素材-极速奔跑者.zip

    嵌入式八股文面试题库资料知识宝典-微软_interview.zip

    嵌入式八股文面试题库资料知识宝典-微软_interview.zip

Global site tag (gtag.js) - Google Analytics