ChinaUnix.net
相关文章推荐:

perl实现在文件里搜索带关键字的行

#!/usr/bin/perl use strict; use warnings; my $log_file = '/home/aaa/log'; open(LOG,"){ print if /\[error]|error/; } close(LOG); 解释:从文件中打印包含“[error]”或者“error‘关键字。 本文来自ChinaUnix博客,如果查看原文请点:http://blog.chinaunix.net/u/25264/showart_1728481.html

by huifeideluotuo - Linux文档专区 - 2008-12-18 22:51:41 阅读(958) 回复(0)

相关讨论

用open(CONTEXT , "$contextfile") ||die "Can't read context file!"; my @file = ;; 读过来的是将整个文件全部放到@file中间去了,@file只有一个元素, 我希望将文本按照每个回车分成一个数组元素,请问如何实现

by zhoujianxin - Perl - 2003-07-29 16:11:18 阅读(2037) 回复(1)

RT 比如: test.pl #!/usr/bin/perl my $n = 1; my $cmd="echo"; my $arg = $ARGV[0]; while ($n < 10) { system("$cmd $arg"); $n++; } 执: # perl test.pl "\$n" [ 本帖最后由 miniqq 于 2009-11-14 10:43 编辑 ]

by miniqq - Perl - 2009-11-15 17:32:10 阅读(1579) 回复(5)

各位老哥,老姐,小弟有个问题想让大家帮忙看看 需求是这样的: 在Windows系统D:\perl目录下有只有一个EXE文件(这个文件文件名不确定,但可以确定文件名中有“windows”这个字符串。例如,文件名是abcd_windows_i386.exe 或者是1245_windows_x86-64.exe) 首先需要用perl确定这个文件名,并把此文件名赋值为变量。然后运这个执文件。 如果此EXE文件时需要配合参数,又该当如果实现 啊。 希望各位老哥,老姐...

by i57110403 - Perl - 2010-06-21 10:23:43 阅读(2551) 回复(8)

我想到其他网站仅仅取得一个文件。 放在我自己的网站。 每天更新的。谢谢 不过我的网站建在虚拟主机上. 基本配置是无法改变的.

by seawolf1979 - Perl - 2006-01-09 21:59:29 阅读(1975) 回复(7)

foreach(){ printf "%21s\n",$_; } 这是从,TEXT是一个文件,数组的第一输出到最后一,怎么从最后一依次输出到第一! [ 本帖最后由 macroon_cn 于 2009-4-3 11:39 编辑 ]

by macroon_cn - Perl - 2009-04-03 16:06:29 阅读(3089) 回复(6)

如: Query= nmtca_Cluster3542.seq.Contig1 [178 - 513] (112 letters) Database: g:/blast/wormpep206.fasta 24,143 sequences; 10,671,996 total letters Searching..................................................done Score E equences producing significant alignments: (bits) Value Y54F10AM.8 Unknown 101 8e-023 F09B12.3 Unknown 82 4e-017 Y37D8A.2 Unknown 55 7e-009 Score = 101 bits (251), Expect = 8e-023 ...

by foumer - Perl - 2012-05-05 12:09:38 阅读(5103) 回复(16)

我想 在perl 脚本中执 perl的一命令 perl -wni.bak -e 'if ( $_ =~ m/.*FileRef/ ){ s/Car/UserCar/g}' filename 用过system 报错:Can't find string terminator "'" anywhere before EOF at -e

by luyi1983 - Perl - 2009-12-22 09:19:02 阅读(3754) 回复(11)

如果我有一个 aa.txt文本面的内容是 IN A www.naodi.com IN A www.qq.com IN A www.naodi.com 当我要取出第3的www.naodi.com 我,此时我应该要获取文本的数,我的问题是如何获取到他的数,获取到数如何将他取出:mrgreen:

perl关键

by mitmax - Perl - 2010-09-27 15:41:33 阅读(2632) 回复(3)

[code]#!/usr/bin/perl use strict; use LWP::Simple; my $content = "jjj87784834hMC=[aak4i534hkgke]jdhjkh4kj3hjkgd联系人:鸟人#dfdglk43543"; my ($tld,$lian) = $content =~ /MC=\[(.*)]+联系人:(.*)#/; print $tld $lian;[/code] 请教下如何把[ ] 和联系人 取出来

by mitmax - Perl - 2010-07-08 13:43:42 阅读(1472) 回复(4)

想求助各位大牛,CGI:SESSION登录后,如何利用session来判断某用户能下载文件文件格式为DOC。

perlsession认证

by shiru - Perl - 2010-12-20 10:20:18 阅读(2032) 回复(6)