linux社区爱心援助Linux认证系列教程业界动态站务新闻公司招聘网络学院网址大全LPI专题CISCO专题
设为首页
加入收藏
管理团队
JSP  
JAVA  
PERL  
 您的位置:首页 > 开发语言 > perl >
栏目导栏
  php
  JSP
  ASP
  asp.net
  JAVA
  c/c++/c#
  perl
  JavaScript
  Basic
  Delphi
资料搜索
热门文章
·perl入门学习指南
·perl入门教程:Perl 的变量
·perl入门教程:Perl的语法与C语
·Perl文件及目录操作
·perl入门教程:Perl概述
·perl入门教程:正则表达式
·perl 学习笔记
·Perl常用系统函数
·perl中传递和存储文件句柄
·Perl连接Oracle数据库的方法
·curl+perl的自动MAIL报警程序
·使用 perldoc 找文档
·perl入门教程:Perl 程序的属性
·Perl新手的误区和新手必读
·Perl命令行应用介绍
最新文章
·perl 学习笔记
·Perl 特殊变量
·perl Base64码的获取
·perl 父子进程的数据库连接继承
·工作中的实用 perl 脚本
·perl中传递和存储文件句柄
·curl+perl的自动MAIL报警程序
·Perl类包的动态调用
·使用open创建的管道进行父子进
·perl 执行一个系统命令(svn in
·windows平台下根据可执行文件名
·关联数组(hash)
·Perl语言在风险评估的系统基础
·在Perl/CGI中使用模板
·PERL CGI 常见问题
Google
 
Perl的基本输入输出
[ 作者:  加入时间:2007-10-09 13:06:19  来自:Linux联盟收集整理 ]

从STDIN输入  i93Linux联盟
  i93Linux联盟
从标准输入设备读取数据是很容易的,我们已经从第一课上就使用<STDIN>操作符了。例如:  i93Linux联盟
$name=<STDIN>;  i93Linux联盟
在数组环境中,可把所有剩余的行作为一列表返回。如:  i93Linux联盟
@name=<STDIN>;  i93Linux联盟
此时,需要读入多行,然后再对各行分别处理。通常做法是:  i93Linux联盟
while($_=<STDIN>){  i93Linux联盟
chop($_);  i93Linux联盟
#处理$_(每一行)  i93Linux联盟
i93Linux联盟
上述程序可简化为:  i93Linux联盟
while(<STDIN>){  i93Linux联盟
chop; #等同于chop($_)  i93Linux联盟
处理$_(每一行)  i93Linux联盟
i93Linux联盟
因为$_是许多操作符的缺少变量。 

从<>输入 

读取输入的另一种方法是使用<>。<>是从Perl程序命令行所指定的文件中读取数据。例如有个文件名为pro1的程序:  i93Linux联盟
#!/usr/bin/perl;  i93Linux联盟
while(<>){  i93Linux联盟
print $_;  i93Linux联盟
i93Linux联盟
在UNIX环境中运行:  i93Linux联盟
pro1 file1,file2,file3  i93Linux联盟
此时,将依次读入文件file1,file2,file3中的每一行,然后显示输出。 

向STDOUT输出 

Perl用print和printf向标准输出设备输出。  i93Linux联盟
print操作符使用字串列表作为参数,依次把每个字符串发送给标准输出,在发送时不插入或改变任何字符。如:  i93Linux联盟
  i93Linux联盟
print "网上学园"."欢迎您!" #打印"网上学园欢迎您!"  i93Linux联盟
print 1+2,"你好" #打印"3你好"  i93Linux联盟
printf操作符用于格式化输出,在C语言中有相同的功能。它使用一个参数表,第一个参数是格式控制字符串,它定义了如何打印其余参数。例如:  i93Linux联盟
  i93Linux联盟
printf "%10s% 8d%8.2f\n",$a,$b,$c  i93Linux联盟
它的打印结果为:10个字符宽度的$a,空格,8个字符宽度的整数$b,8个字符宽度且包含两位小数的浮点数$c,最后换行。  i93Linux联盟
  i93Linux联盟
注意:与前面操作符相类似,printf()的括号可以省略。

Linux联盟收集整理 ,转贴请标明原始链接,如有任何疑问欢迎来本站Linux论坛讨论
评论】【加入收藏夹】【 】【打印】【关闭
※ 相关链接
 ·Perl语言在风险评估的系统基础信息采集工作中的应用  (2007-10-29 11:21:11)
 ·在Perl/CGI中使用模板  (2007-10-11 17:35:11)
 ·PERL CGI 常见问题  (2007-10-11 17:34:39)
 ·perl写CGI时出现500号错误总结  (2007-10-11 17:33:28)
 ·Perl编写CGI时需要注意问题  (2007-10-11 17:32:44)
 ·Perl CGI编程安全点滴  (2007-10-11 17:31:59)
 ·关于PERL的数据库  (2007-10-11 17:29:46)
 ·perl连接access数据库  (2007-10-11 17:28:57)
 ·perl使用DMB数据库的方法  (2007-10-11 17:28:14)
 ·Perl语言中向数据库中写值的特殊字符问题  (2007-10-11 17:27:11)