Perl学习笔记之文件操作
作者:junjie 发布时间:2022-04-01 21:48:18
标签:Perl,文件操作
Perl对文件的操作,跟其它的语言类似,无非也就是打开,读与写的操作。
1. 打开文件
#! c:/perl/bin/perl -w
use utf8;
use strict;
use warnings;
my $filename = 'test.txt'; # 或者用绝对路径,如: c:/perl/Learn/test.txt
if(open(MYFILE,$filename)) # MYFILE是一个标志
{
printf "Can open this file:%s!", $filename;
close(MYFILE);
}
else{
print "Can't open this file!";
}
2. 读取文件
#! c:/perl/bin/perl -w
use utf8;
use strict;
use warnings;
my $filename = 'test.txt';
if(open(MYFILE,$filename))
{
my @myfile = <MYFILE>; #如果要读取多行,用此方法,如果只读取一行为:$myfile = <>;
my $count = 0; #要读取的行数,初始值为0
printf "I have opened this file: %s\n", $filename;
while($count < @myfile){ #遍历
print ("$myfile[$count]\n"); #注意此种写法.
$count++;
}
close(MYFILE);
}
else{
print "I can't open this file!";
}
exit;
3. 写入文件
#! c:/perl/bin/perl -w
use utf8;
use strict;
use warnings;
my $filename = 'test.txt';
if(open(MYFILE,">>".$filename)) #此种写发,添加不删除
{ #此种写法,重写文件内容 MYFILE,">".$filename
print MYFILE "Write File appending Test\n";
close(MYFILE);
}
else{
print "I can't open this file!";
}
exit;


猜你喜欢
- 在做手机开发时,经常碰到一些比较耗时的操作,这个时候进度条就开始派上用场了。这个demo展示了ProgressBar进度条和Progress
- 在访问数据库时,特别是新手,可能会需要查询表中数据总数,以下这段代码可以非常简便的获取到数据数目//先建立数据库连接,执行查询语句Conne
- 一、MySQL安装MySQL的下载http://dev.mysql.com/downloads/mysql/MySQL版本选择MySQL功能
- 很多网站登录登陆时都要用到滑块验证码,在某些场景例如使用爬虫爬取信息时常常受到阻碍,想着用opencv的模板匹配试试能不能实现模拟登陆。本来
- fso对象CreateTextFile方法调用时可能会报“无效的过程调用或参数”错误,在使用ASP生成静态页面时,如果传入的字符串参数编码为
- Fibonacci斐波那契数列,很简单,就是一个递归嘛,学任何编程语言可能都会做一下这个。最近在玩Python,在粗略的看了一下Learni
- 1. MySQL表空间回收我们经常会发现一个问题,就是把表数据删除以后发现,数据文件大小并没有变化,这就是标题中所说的MySQL数据库表空间
- Python反转二维数组的行和列代码如下:import numpy as nparr=np.arange(12).reshape(4,3)p
- 作用:主要记录信息,便于定位查看问题。python logging模块官网:https://docs.python.org/zh-cn/3.
- 说起模板引擎,很多人会认为这是后台的东西(如PHP的Smarty、Java的Velocity),跟前端没有关系。然而,随着前端的逻辑变得越来
- Python连接MySQL,进行数据库表变更和查询:python mysql insert delete query:#!/usr/bin/
- 在go语言中,byte其实是uint8的别名,byte 和 uint8 之间可以直接进行互转。目前来只能将0~255范围的int转成byte
- 网络请求封装实例实现定制要求和方便调用,对微信小程序的网络请求接口进行了封装封装位置:app.js,方便全局调用实现方法调用,只用关注接口u
- 理解property和attribute这个要看具体的语境了。不过我们可以从词源的角度来区分一下这两者:property形容词propert
- 你好,%用户名%!我叫Alex,我在机器学习和网络图分析(主要是理论)有所涉猎。我同时在为一家俄罗斯移动运营商开发大数据产品。这是我第一次在
- 1、文件编码:指的是页面文件(.html,.php等)本身是以何种编码来保存的。记事本和Dreamweaver在打开页面时候会自动识别文件编
- think-queue是ThinkPHP官方提供的一个消息队列服务,是专门支持队列服务的扩展包。think-queue消息队列适用于大并发或
- 此次主要介绍介绍在flask框架中如何集成swagger文档, 我们知道以前给同事提供接口文档主要是写一个文档, 当遇到频繁修改
- 创建触发器创建只有一个执行语句的触发器CREATE TRIGGER 触发器名 BEFORE|AFTER 触发事件ON 表名 FOR EACH
- 一般在卸载完数据库时,大家都希望能够将注册表信息完全删干净,下面就将教您彻底删除SQL Server注册表的方法,供您参考。在卸载SQL S