本文目录
perl中如何控制子进程的标准输入
@_ 在某个函数内，数组 @_ 包含传递给该函数的所有参数。$_ 默认的输入/输出和格式匹配空间--------------------------------------------------------------------------------------------------------@_的示例：#!/bin/perl -wuse strict;&fun( 111,222,333 );sub fun(){ print @_;}这里会把传入函数的参数111222333打印出来。---------------------------------------------------------------------------------------------$_示例：下面的几对代码都是等同的：while (《》) # equivalent only in while! while (defined($_ = 《》)) /^Subject:/ $_ =~ /^Subject:/ tr/a-z/A-Z/ $_ =~ tr/a-z/A-Z/chomp chomp($_) 以下是几处即使没有写明 Perl 也会假定使用 $_ 的地方： * 各种单目函数，包括像 ord() 和 int() 这样的函数以及除 "-t" 以外所有的文件 测试操作 ("-f"，"-d")，"-t" 默认操作 STDIN。 * 各种列表函数，例如 print() 和 unlink()。 * 没有使用 "=~" 运算符时的模式匹配操作 "m//"、"s///" 和 "tr///"。 * 在没有给出其他变量时是 "foreach" 循环的默认迭代变量。 * grep() 和 map() 函数的隐含迭代变量。 * 当 "while" 仅有唯一条件，且该条件是对 "《FH》" 操作的结果进行测试时，$_ 就是存放输入记录的默认位置。除了 "while" 测试条件之外不会发生这种情况。 (助记：下划线在特定操作中是可以省略的。)--------------------------------------------------------------------------------------------------@_和$_都是perl很常用的特殊变量。建议系统看一下《perl语言入门》。----------------------------------------------------------------------------------------------------------------另附perl常用特殊变量列表：perl 内置变量$- 当前页可打印的行数,属于Perl格式系统的一部分$! 根据上下文内容返回错误号或者错误串$” 列表分隔符$# 打印数字时默认的数字输出格式$$ Perl解释器的进程ID$% 当前输出通道的当前页号$& 与上个格式匹配的字符串$( 当前进程的组ID$) 当前进程的有效组ID$* 设置1表示处理多行格式.现在多以/s和/m修饰符取代之.$, 当前输出字段分隔符$. 上次阅读的文件的当前输入行号$/ 当前输入记录分隔符,默认情况是新行$: 字符设置,此后的字符串将被分开,以填充连续的字段.$; 在仿真多维数组时使用的分隔符.$? 返回上一个外部命令的状态$@ Perl解释器从eval语句返回的错误消息$ Perl解释器的子版本号$^ 当前通道最上面的页面输出格式名字$^A 打印前用于保存格式化数据的变量$^D 调试标志的值$^E 在非UNIX环境中的操作系统扩展错误信息$^F 最大的文件捆述符数值$^H 由编译器激活的语法检查状态$^I 内置控制器的值$^L 发送到输出通道的走纸换页符$^M 备用内存池的大小$^O 操作系统名$^P 指定当前调试值的内部变量$^R 正则表达式块的上次求值结果$^S 当前解释器状态$^T 从新世纪开始算起,脚步本以秒计算的开始运行的时间$^W 警告开关的当前值$^X Perl二进制可执行代码的名字$_ 默认的输入/输出和格式匹配空间$| 控制对当前选择的输出文件句柄的缓冲$~ 当前报告格式的名字$` 在上个格式匹配信息前的字符串$’ 在上个格式匹配信息后的字符串$+ 与上个正则表达式搜索格式匹配的最后一个括号$《 当前执行解释器的用户的真实ID$ 含有与上个匹配正则表达式对应括号结果$= 当前页面可打印行的数目$》 当前进程的有效用户ID包含正在执行的脚本的文件名$ARGV 从默认的文件句柄中读取时的当前文件名%ENV 环境变量列表%INC 通过do或require包含的文件列表%SIG 信号列表及其处理方式@_ 传给子程序的参数列表@ARGV 传给脚本的命令行参数列表@INC 在导入模块时需要搜索的目录列表$- 代表当前匹配的正则表达式在被匹配的字符串中的起始和终止的位置☆
请教有关PERL编程的问题
1.可以自学2.入门的： PERL语言入门（第四版）俗称小骆驼书 主要讲述语法 简单应用 专业级：perl语言编程， 俗称大骆驼书 是该语言的编写者Larry Wall及其信徒编写的。3.PERL的最大有点就是可移植性，基本可以在所有操作系统下运行4. 搜索CPAN 这是全球最大的PERL社区，提供perl的所有文档说明，模块下载及说明等等等等。5.资格证书。。 没听说过，不可以查询一下最后说几句，你用了perl会发现perl是一门懒人专用的语言，可以随心所欲的编写代码。另外perl真的很强大，不论什么工作，你都可以用perl找到解决方法，有难有易而已。如果你最主要的工作是文档处理，perl是你的首选。（当然还包括生物分析等）
请问下while()里面的<>是什么意思啊
my @s;while(《》){ #《》是从数组@ARGV中得到的参数 如果@ARGV 是空的 就使用标准输入流 即从command 中 #输入的内容 chomp; #去掉结尾的换行符 unshift @s,$_; # 将读入的内容即$_ 放入数组@s中} # 会一直循环 直至 手动终止程序foreach(@s){ print "$_\n"; #会把数组@s中的内容 逐一读取出来 并换行}可以看一下 “Perl 语言入门” 网上有PDF
