导航:首页 > 版本升级 > 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修改文件内容相关的资料

热点内容
javac内存管理 浏览:532
秒剪APP怎么剪掉不要的部分 浏览:416
宜宾有什么拆迁文件 浏览:811
linuxterminator使用 浏览:551
ai启动配置文件 浏览:664
汽车故障诊断数据采集有什么用 浏览:594
手机对手机传文件最快 浏览:103
文件预览窗格图片怎么放大 浏览:699
自动编程适用于哪些情况 浏览:686
乐高编程课是学什么的幼儿园 浏览:880
照片删除了在哪个文件夹 浏览:513
电脑怎么把文件图片变大 浏览:565
红米1s蓝牙能升级吗 浏览:222
javadbx 浏览:486
xls文件转sel文件 浏览:300
手机系统老是升级失败是怎么回事 浏览:456
求个能用的苹果账号 浏览:419
如何快速把文件夹里重复的歌删除 浏览:606
如何用编程求鸡兔同笼 浏览:604
word2007图片选择 浏览:630

友情链接