在线咨询
eetop公众号 创芯大讲堂 创芯人才网
切换到宽版

EETOP 创芯网论坛 (原名:电子顶级开发网)

手机号码,快捷登录

手机号码,快捷登录

找回密码

  登录   注册  

快捷导航
搜帖子
查看: 3586|回复: 8

求助:写一个小程序用C-shell和perl,请高手帮忙!!十分感谢~~

[复制链接]
发表于 2009-10-16 11:01:50 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?注册

x
求助:写一个小程序用C-shell和perl,请高手帮忙!!十分感谢~~
************************************************************
给一个文件,用C_shell判断包含某字符串的行数和不包含该字符串的行数,用perl写一程序找出含某字符串的变量,在变量后加上另一字符串,并输出.
************************************************************
发表于 2009-10-16 21:08:35 | 显示全部楼层
楼主描述的太抽象,可否举个例子,不然没法帮你
发表于 2009-10-22 15:00:56 | 显示全部楼层
#!bash/csh -f
发表于 2009-10-23 17:03:25 | 显示全部楼层
发表于 2009-11-3 19:06:22 | 显示全部楼层
本帖最后由 heal119 于 2009-11-3 19:11 编辑

perl script:

#!usr/bin/perl -w

open(PTR ,"file");
@string_line=<PTR>;
foreach (@string_line){
if (/string/){
  $_=~s/string/string add_string/g}
print $_;
}
发表于 2009-11-25 21:59:43 | 显示全部楼层
谢谢楼上的兄弟!
发表于 2009-12-10 07:21:07 | 显示全部楼层
正则表达式,应该十分容易
发表于 2011-11-26 22:54:37 | 显示全部楼层
学习中!
发表于 2011-11-28 10:14:28 | 显示全部楼层
如果是计数的话:(改lslslsls兄弟代码)
#!usr/bin/perl -w
my countera;
my counterb;

open(PTR ,"file");
@string_line=<TR>;
foreach (@string_line){
if (/string/){
  countera ++;}
else {counterb ++;}
#print $_;
}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

站长推荐 上一条 /1 下一条


小黑屋| 手机版| 关于我们| 联系我们| 在线咨询| 隐私声明| EETOP 创芯网
( 京ICP备:10050787号 京公网安备:11010502037710 )

GMT+8, 2024-11-15 15:37 , Processed in 0.034991 second(s), 8 queries , Gzip On, Redis On.

eetop公众号 创芯大讲堂 创芯人才网
快速回复 返回顶部 返回列表