Perl 中如何定义格式?


Perl 使用名为“格式”的书写模板来输出报告。若要使用 Perl 的格式功能,必须先定义一个格式,然后可以使用该格式来编写已格式化的数据。

语法

以下是定义 Perl 格式的语法 -

format FormatName =
fieldline
value_one, value_two, value_three
fieldline
value_one, value_two
.

此处的FormatName表示格式的名称。fieldline是以特定方式来格式化数据的。值行表示将要输入到字段行的值。使用一个句点结束格式。

下一个fieldline可以包含任何文本或字段持有者。字段持有者为将要随后放置在此的数据保留空间。字段持有者的格式为 -

@<<<<

此字段持有者左对齐,带有 5 个空间的字段空间。必须对@符号和<符号进行计数,以了解字段中的空间数量。其他字段持有者包括 -

@>>>> right-justified
@|||| centered
@####.## numeric field holder
@* multiline field holder

一个示例格式如下 -

format EMPLOYEE =
===================================
@<<<<<<<<<<<<<<<<<<<<<< @<<
$name $age
@#####.##
$salary
===================================
.

在此示例中,$name 将编写为在 22 个字符空间内左对齐,然后年龄将以两个空格进行编写。

更新于:2019-11-29

94 次浏览量

开启您的 职业

完成课程即可获得认证

开始
广告