位置: 编程技术 - 正文

Perl 批量添加Copyright版权信息(perl 批量注释)

编辑:rootadmin

推荐整理分享Perl 批量添加Copyright版权信息(perl 批量注释),希望有所帮助,仅作参考,欢迎阅读内容。

文章相关热门搜索词:perl 批量注释,perl 追加写文件,perl怎么将内容写入文件,perl 批量修改文件名,perl 批量注释,perl copy 文件,perl 批量注释,perl copy 文件,内容如对您有帮助,希望把文章链接给更多的朋友!

对所有输入文件,如果没有版权信息则加上版权信息,否则什么都不做,并对原文件以.bak结尾备份。

开始我使用如下程序(尝试前千万先备份输入的文件):

结果:原文件和备份文件全部空白,真是糟糕。(切记以后测试程序时,要做好备份)。分析原因:

主要是由于$^I使用错误。先来看看关于$^I的运作原理:

Perl 批量添加Copyright版权信息(perl 批量注释)

$^I 默认值undef,这不会影响程序。如果将其赋值为某个字符串(如程序中的".bak"),程序将执行备份操作,并将该字符串添加到原文件名后面,成为备份文件名的拓展名。使用钻石操作符打开文件时,perl的操作是,先将打开的文件名改成加了拓展名的文件名,然后再新建一个原来的文件名的文件,然后在程序一行行读入文件内容并做一些改动后,会保存到新文件中去。这样就相当于修改了文件内容,并将老文件进行了备份。当然,如果值是undef,则不会备份旧文件。

由于上面程序中将$^I = ".bak";放在最前面,但后面有两次读取文件操作。假设读入文件为file.pl,第一次while(<>)将原文件变成了file.pl.bak。然后新建一个空文件命名为file.pl;但新文件只有程序结束的时候才会写入磁盘中,所以接下来第二次读取文件操作while(<>)时,将会把空白的file.pl变成file.pl.bak,这样就覆盖了第一次的备份文件,然后再新建一个新的空白文件file.pl,此时,包括原文件和备份文件内容都是空白。

理解了$^I的工作原理,程序就很容易修改了:

只需将$^I = ".bak";放到最后一个文件读取操作while(<>)之前就好了,如下:

这样基本上就可以了,大家可以根据需要自行修改。希望大家多多支持积木网。

Perl字符串比较和整数比较的区别详解 本文向大家介绍一下Perl字符串比较和整数比较.Perl语言中Perl字符串可分为单引号和双引号字符串,那么如何进行Perl字符串比较呢,请看本文详细介绍:本文

Perl字符串处理函数大全 下面请看本文详细介绍.Perl字符串处理函数1.index语法:position=index(string,substring,position);语义:返回子串substring在字符串string中的位置,如果不存在则返回-1。

Perl时间处理函数用法介绍 一.Perl时间的表示函数1.表示日期的方式多种多样:"Jan";"//";"//";"Jan";"--";"--";"/".其中一些格式意思不清(如"--",是表

标签: perl 批量注释

本文链接地址:https://www.jiuchutong.com/biancheng/368760.html 转载请保留说明!

上一篇:Perl与JS的对比分析(数组、哈希)(perl scripts)

下一篇:Perl字符串比较和整数比较的区别详解(perl 比较符)

  • 发票没有申报能开票吗
  • 进项税额转出的例题
  • 汇算清缴加计扣除表
  • 免税农产品发票怎么抵扣申报
  • 个人独资企业可以核定征收吗
  • 不需要缴纳税款和服役的是形势户寺观户
  • 小规模收的专票怎么做账
  • 菜场摊位租赁合同
  • 租办公用房要交房产税吗
  • 增值税逾期未申报的税务怎么处理
  • 零余额账户收到钱怎么办
  • 申请专利的费用如何入账
  • 个人去税务局能开什么类型的发票
  • 其他应交款和应交税费
  • 个人去税务局开居间费发票
  • 计提年终奖金的会计分录怎么写
  • 房产税税率及计算方法最新
  • 低价销售代替非正常损失避免转出进项税?
  • 小区物业宿舍
  • 一般纳税人专业分包税率
  • 异地预缴的税款是抵减全部的税款吗
  • 企业专项储备属于什么科目
  • 免税农产品加工企业
  • 管理费用的结转需要在明细账中体现吗
  • iphone制造成本
  • 计提税金及附加怎么算
  • 劳务费费用
  • macOS 11 Big Sur 开发者预览版 Beta 7正式推送
  • 委托代销商品税法规定
  • 融资中的未确认利息
  • php数组函数实现机选双色球
  • 计提固定资产折旧怎么做会计科目
  • 企业支付宝收到钱到哪里
  • 被辞退有补助金吗
  • 取得专票怎么结转销售成本
  • 收入和支出怎么合计
  • 如何理解土地使用制度
  • 税控盘维护费全额抵扣分录怎么做
  • 员工出差机票计入什么科目
  • 其他综合收益要交企业所得税吗
  • php 命名空间
  • php同时使用session和cookie来保存用户登录信息的实现代码
  • 税务申报说明怎么写范文
  • 处置抵债资产的账务处理
  • 当月计提的公积金怎么取
  • sqlloader语法
  • 销售产品的运输费会计分录
  • 一般纳税人购入不动产增值税税率
  • 计提的坏账准备计入什么科目
  • 堤围防护费如何计算
  • 主办会计与往来会计区别
  • 生产部的管理人员算什么费用
  • 小规模纳税人加工劳务的税率是多少
  • 金蝶利息收入的正确分录
  • 网络服务费计入什么费用
  • 财务费用是负数什么意思
  • 高新技术企业一定是先进制造业吗
  • 发票隔年还能做账吗
  • 未完施工是存货吗
  • sqlserver中with(nolock)深入分析
  • 在Linux环境下mysql的root密码忘记解决方法(三种)
  • windows server2008 64位没有安装音频怎么办?
  • windows 08
  • ubuntu系统中安装微信步骤
  • win8系统进不了桌面怎么办
  • Win10 Mobile 10572预览版上手体验视频
  • centos6.5如何安装
  • win7 win8 win8.1
  • Win10 Mobile 10586.29重要更新 可以玩wp7中的游戏
  • 表示网页行为的是
  • js调用wsdl接口
  • bash脚本加密
  • 小助手是什么软件
  • Shell脚本统计文件行数
  • unity 3d游戏开发
  • 1、BluetoothChat之BluetoothChat.java
  • python 解析算法
  • 如何在网上开税票发票
  • 服务合同需要交个人所得税嘛
  • 免责声明:网站部分图片文字素材来源于网络,如有侵权,请及时告知,我们会第一时间删除,谢谢! 邮箱:opceo@qq.com

    鄂ICP备2023003026号

    网站地图: 企业信息 工商信息 财税知识 网络常识 编程技术

    友情链接: 武汉网站建设