导航:首页 > 版本升级 > perl修改文件内容

perl修改文件内容

发布时间:2023-08-14 15:37:40

㈠ perl,正则表达式修改文件

usewarning;
my$xxxx;#设置初始变量
openxxx;#怎么打开文件,自己看书吧
while(<$文件变量>)#这个就是遍历文件的每一行
{
#使用正则表达式+if语句,思路:如果在开头能匹配到任意字符,则输出匹配到的内容。
$&if(/^./,$_);
#大概是这个意思,记不太清,$_默认变量,代表每一行的内容,你自己查小骆驼,书上这些基础知识点都有,这道题是最基本的了
}
close$xxx;#关闭句柄

㈡ 如何在使用Perl来修改文本文件,要求在文件中出现字符('或,'时在中间插入一个N,即将其改为(N'或,N'

给一个比较完美的方案:
#!perl -w
use strict;
#AUTHOR: niejieqiang

while (<>) {
s/('.*?')/&rm($1)/ge;
print;
}

sub rm {
my $str = $_[0];
$str=~s/^/N/;
return $str;
}

㈢ 在linux下用perl修改文件

第一是,perl文件的第一行要指定perl解释器的位置,典型的如下
#!/usr/bin/perl
第二是,perl文件的权限要有可执行的权限,可通过右键->属性->权限,勾选来添加可执行权限(当然,你本身也应该有修改该文件权限的权限),也可以通过在命令行上执行chmod
+x
来添加执行权限。

㈣ 用perl -pi -e命令对linux系统某文件夹中的所有文件进行内容替换操作,该操作怎么恢复

操作系统没有提供恢复功能,如果你有备份文件,可以使用备份的文件替换当前的文件,否则是没有办法恢复的。

因为LINUX文件系统为了最求较高效率,没有对文件设置版本功能,修改文件并不自动保留修改前的内容。

㈤ 在Perl脚本语言下,如何修改文件内容

你这问题问的不清楚,你给的例子里面也只处理了10转28,而且目前你这个写法,110也会被转化为128,最重要的是,你这代码完全不能修改你的文件,因为你foreach$kill(@new){$kill=~s/10/28/g;}这个只是对临时变量$kill处理了。完全没有对@new改动,所以再把new的内容写到FILE2没有意义。

openFILE1,"a.txt";
my@new=<FILE1>;
my$result=join'',@new;
$result=~s/10/28/gis;
closeFILE1;

openFILE2,">a.txt";
printFILE2$result;
closeFILE2;


测试了一下28替换10的,源文件内容:

# 102319482311010101a

# 11210948231a

# 112119482310b



执行之后,同一文件内容改变为:

# 282319482312828281a

# 11228948231a

# 112119482328b


你看看是不是能解答你的问题

阅读全文

与perl修改文件内容相关的资料

热点内容
win7无线网络列表 浏览:421
好省app口令怎么来的 浏览:22
系统文件查找app 浏览:690
js跳转qq 浏览:755
为什么有些压缩文件不能解压 浏览:403
李刚疯狂安卓讲义视频下载 浏览:329
主播视频推广app怎么收费 浏览:178
台湾订酒店用什么app 浏览:160
怎么把微信文件导电脑桌面 浏览:607
三星刷机清空缓存是什么文件夹 浏览:125
腾讯视频转码器找不到文件 浏览:621
电脑怎么删除相同的文件内容 浏览:961
清除电脑开机coms密码 浏览:394
cad打开高版本文件微信公众号 浏览:771
智龙迷城如何快速升级 浏览:173
笔画代码 浏览:766
北京装修网站都有哪些爱空 浏览:240
基金app场外怎么转场内 浏览:806
网络运营毕业设计包含哪些部分 浏览:712
论文文档在哪个文件夹 浏览:600

友情链接