perl printf函数

printf函数可以格式化输出字符串

用法：

printf FILEHANDLE FORMAT,LIST

printf FORMAT,LIST

例如：

printf函数先格式化字符串再输出到指定文件或当前缺省文件中，如：
 printf OUTFILE (“You owe me %8.2f",$owing); 此语句取出变量$owing的值并替换掉串中的%8.2f，%8.2f是域格式的例子，把$owing的值看作浮点数。

使用 printf 格式化输出

printf 函数有一个模板，叫格式字符串，它可以规定输出的格式，每个格式符有百分号开头，由字母结束。

格式化字符串中有 3 个格式符，则对应 3 个元素

%g  输出数字，它将根据需要自动选用浮点数，整数或者指数

%d  十进制整数 %x 十六进制   %o 八进制 根据需要截尾

%f or %s 限制宽度 其中正数是右对齐，负数是左对齐

%s 是针对字符串的，如 %10s,%-15s

% f 针对数字的，如 %12.3f  ( 表示输出共 12 个字符，包括小数点，并且小数点后面只有 3 位数 )

%% 输出百分号，不会使用后面列表中的元素

下面看一个对齐输出的例子：
#!/usr/bin/perl use warnings; use strict; my @arr; while(<DATA>){          chomp;          @arr=split; printf "%-50s%-20s/n",$arr[0],$arr[1]; print "===================/n"; } __DATA__ PRODUCT:NLSRTL   VERSION:10.2.0.1.0   STATUS:Production PRODUCT:OracleDatabase10gEnterpriseEdition   VERSION:10.2.0.1.0   STATUS:Prod PRODUCT:PL/sql   VERSION:10.2.0.1.0   STATUS:Production PRODUCT:TNSforLinux:   VERSION:10.2.0.1.0   STATUS:Production 输出： PRODUCT:NLSRTL                                    VERSION:10.2.0.1.0  =================== PRODUCT:OracleDatabase10gEnterpriseEdition        VERSION:10.2.0.1.0  =================== PRODUCT:PL/sql                                    VERSION:10.2.0.1.0  =================== PRODUCT:TNSforLinux:                              VERSION:10.2.0.1.0  =================== 可能看着不齐，实际是右对齐！