Perl 教程 之 Perl 格式化输出 1

Perl 格式化输出

Perl 是一个非常强大的文本数据处理语言。

Perl 中可以使用 format 来定义一个模板，然后使用 write 按指定模板输出数据。

Perl 格式化定义语法格式如下：

format FormatName =
fieldline
value_one, value_two, value_three
fieldline
value_one, value_two
.
参数解析：

FormatName ：格式化名称。
fieldline ：一个格式行，用来定义一个输出行的格式,类似 @,^,<,>,| 这样的字符。
value_one,value_two…… ：数据行，用来向前面的格式行中插入值,都是perl的变量。
. ：结束符号。
以下是一个简单是格式化实例：

实例

!/usr/bin/perl

$text = "google baidu taobao";
format STDOUT =
first: ^<<<<< # 左边对齐，字符长度为6
$text
second: ^<<<<< # 左边对齐，字符长度为6
$text
third: ^<<<< # 左边对齐，字符长度为5，taobao 最后一个 o 被截断
$text
.
write

执行以上实例输出结果为：

first: google
second: baidu
third: taoba