首页 > 编程 > Perl > 正文

Perl的基本输入输出

2019-11-18 17:24:06
字体:
来源:转载
供稿:网友
从STDIN输入

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

从<>输入

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

向STDOUT输出

Perl用print和printf向标准输出设备输出。
print操作符使用字串列表作为参数,依次把每个字符串发送给标准输出,在发送时不插入或改变任何字符。如:

print"网上学园"."欢迎您!"#打印"网上学园欢迎您!"
print1 2,"你好"#打印"3你好"
printf操作符用于格式化输出,在C语言中有相同的功能。它使用一个参数表,第一个参数是格式控制字符串,它定义了如何打印其余参数。例如:

printf"s8d8.2f/n",$a,$b,$c
它的打印结果为:10个字符宽度的$a,空格,8个字符宽度的整数$b,8个字符宽度且包含两位小数的浮点数$c,最后换行。

注意:与前面操作符相类似,printf()的括号可以省略。
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表

图片精选