免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 1714 | 回复: 4

求perl小程序 [复制链接]

论坛徽章:
0
发表于 2012-06-12 15:05 |显示全部楼层
需求如下:
在一目录下有如下文件:aaa_12_20120501001.bat,bbb_13_20120501002.bat,.......
此perl小程序要接受传过来的20120501001形式参数,匹配到aaa_12_20120501001.bat文件,对这个文件进行,修改,在每行的最后增加一列固定值,即:20120501001
文件原内容形式为:20120501,345,124,67,89 修改后的形式为:20120501,345,124,67,89 ,20120501001
                                                                                     20120501,445,114,23,34,20120501001
                                                                                      ...........



麻烦各位大侠了!

论坛徽章:
0
发表于 2012-06-12 16:58 |显示全部楼层
帮帮忙,没有人会吗?

论坛徽章:
0
发表于 2012-06-12 17:08 |显示全部楼层
难点在哪呢?替换吗?
  1. my $parm = 20120501001;
  2. while (<DATA>) {
  3.         s/$/,$parm/;
  4.         print;
  5. }

  6. __DATA__
  7. 20120501,345,124,67,89
  8. 20120501,445,114,23,34
复制代码

论坛徽章:
0
发表于 2012-06-12 18:27 |显示全部楼层
回复 3# kk861123


    我如何接受传过来的参数,并匹配对应的文件,然后再修改该文件呢?

论坛徽章:
0
发表于 2012-06-12 19:29 |显示全部楼层
nulijq 发表于 2012-06-12 18:27
回复 3# kk861123


你要是命令行输入参数,就是用@ARGV数组 ,
glob"*.bat"得到文件列表,匹配这个列表就可.
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP