perl语言使用教程(perl基础文件与文件夹操作)
perl语言使用教程(perl基础文件与文件夹操作)
在很多程序中, 我们需要针对文件,以及文件夹来进行操作,现在小编就来说说关于perl语言使用教程?下面内容希望能帮助到你,我们来一起看看吧!
perl语言使用教程
在很多程序中, 我们需要针对文件,以及文件夹来进行操作。
今天我们就初步学习Perl中文件和文件夹的操作。
我们通过下面例子来看:
my $folder = 'test'; my $file = 'test.txt'; my $file2 = 'test2.txt';
检查文件夹是否存在, 不存在则新建一个文件夹, -d 是perl中文件检测命令, 返回是否是一个文件夹。
mkdir可以用来创建一个文件夹
mkdir $folder unless -d $folder;
我们用mkdir来创建, 相反的我们可以用rmdir来删除一个文件夹:
rmdir $folder;
删除文件, 我们使用的是unlink命令, -e用来检测文件是否存在
unlink $file2 if -e $file2;
-s 命令可以得到文件的大小:
print -s $file;
那么如何读取一个文件夹里面的所有文件呢?
Perl中针对文件夹, 有一个类似于文件句柄的对象---目录句柄, 我们使用opendir来新建一个句柄, 使用readdir来逐个读取文件夹中的对象:
opendir my $fd, $folder or die "failed to open folder : $folder\n"; while(my $f = readdir $fd){
忽略所有.开头的文件, 这里用了正则表达式来作为判断条件,具体以后介绍
next if $f =~ /^\./; print "$f\n"; } closedir $fd;
,
-
- 360手机隐私与安全在哪里(手机隐私更重要)
-
2023-10-08 07:46:06
-
- 全民斗战神新手入门攻略(全民斗战神新手选择什么职业好)
-
2023-10-08 07:43:36
-
- 酷比i13pro手机配置参数(酷比i13pro处理器的方法)
-
2023-10-08 07:41:06
-
- 巨野县教育网(巨野县教育系统积极参加巨野县最美网络学习空间评比大赛)
-
2023-10-08 07:38:36
-
- 桔子树怎么养(桔子树养殖方法)
-
2023-10-08 07:36:06
-
- qq会员和大会员的区别(什么QQ大会员来了)
-
2023-10-08 07:33:36
-
- 伊朗无人机防卫系统(人工智能锁定目标)
-
2023-10-08 07:31:06
-
- 球球大作战全国总决赛回放(球球大作战刘先森虎牙直播首秀周六上演)
-
2023-10-08 07:28:36
-
- 博尔特百米创9.58秒世界纪录(34岁百米之王博尔特)
-
2023-10-08 07:26:06
-
- pdf转换成txt注册码(pdf转换器的注册码快速获取)
-
2023-10-08 07:23:36
-
- 乳酸菌的作用与功效(乳酸菌的作用与功效介绍)
-
2023-10-08 07:21:06
-
- 如何把矿泉水冻成冰沙(让矿泉水瞬间结冰的超冷水实验)
-
2023-10-08 07:18:36
-
- 冠昌红外线测温仪it(122如何设置(怎么把红外线测温仪设置好)
-
2023-10-08 07:16:06
-
- 大宋宫词全部演员表(大宋宫词简单介绍)
-
2023-10-08 07:13:36
-
- 宾语从句引导词(四个引导词)
-
2023-10-08 07:11:07
-
- 童年内容梗概(童年内容介绍)
-
2023-10-08 07:08:37
-
- 守望先锋天梯怎么上分最快(守望先锋天梯分数估算方法)
-
2023-10-08 07:06:07
-
- oppo高层变动全球营销总裁(沈义人任OPPO副总裁)
-
2023-10-08 07:03:37
-
- 6款最实用结婚礼物推荐(哪些礼物适合送新婚夫妻)
-
2023-10-08 07:01:07
-
- 史前巨人遗骨是真的吗(网络流传的巨人头骨是真的吗)
-
2023-10-08 06:58:37