perl有最好的文本數據處理能力.這是大家都知道的.在perl本身有一個別的軟件沒有的小功能,就是Perl格式.它相當于簡單的命令行報表和圖表輸出.這個需要先聲明格式.創建格式的文件句柄.然后由@,^,,>,|這樣的字符構成所謂的”報表”來輸出圖表.這樣可以指定出行的外觀.后面接數據項,最后用write來顯示格式化的內容.
樣例:
輸出紀錄格式輸出象下邊一樣定義：
format NAME =
FORMLIST
.
第一部分,聲明.如上.如果省略 NAME，上面的代碼將定義格式輸出 STDOUT。
第二部分,格式行FORMLIST 由一些有序的行組成，每一行都是下面三種類型中的一種：
1. 注釋，以第一列為 # 來表示.
2. 一個格式行，用來定義一個輸出行的格式,就是指上面講的@,^,,>,|這樣的字符
3. 參數行,數據行，用來向前面的格式行中插入值,都是perl的變量
第三部分, 結束 “.”來表示.
格式行(圖形行)語法:
格式行中每個被替換的部分分別以 @ 或者 ^ 開頭。這些行不作任何形式的變量代換。
@ 字段(不要同數組符號 @ 相混淆)是普通的字段。
， >，| 字段的長度通過在格式符號 @，^ 后跟隨特定長度的 ， >，| 來定義,同時，>，| 還分別表示，左對齊，右對齊，居中對齊。如果變量超出定義的長度，那么它將被截斷。
^ 字段，用來進行多行文本塊填充。
復制代碼 代碼如下:
$text = "aaa bbb ccc ";
format STDOUT =
first: ^
$text
second: ^
$text
third: ^
$text
.
write
這樣它會輸出如下：
first: aaa
second: bbb
third: ccc
它默認會對字符串$text進行分解,象split.當然,是以$:存的內容做分割符.
#(在 @ 或 ^ 后邊) 右對齊的另外一種方式,在這些符號后面指定一個數字字段。你可以在這種區域中插入一個 . 來制定小數點的位置。如果這些區域的值包含一個換行符，那么只輸出換行符前面的文本。如@.##就是輸出二位小數.
@* 可以被用來打印多行不截斷的值,也就是多行沒有格式化的輸出.
參數行(數據行)
參數行指定參數的順序必須跟相應的格式行的字段順序一致。不同參數的表達式需要使用逗號分隔。
參數的數據可以是標量數據,也可以是函數的返回值.
參數行被處理之前所有的參數表達式都在列表環境中求值，因此單個列表表達式會產生多個列表元素。
通過使用圓括弧將表達式括起來，可以使表達式擴展到多行 (因此，圓括弧必須是第一行的第一個標志)。這樣就可以將值同相應的格式域對應起來方便閱讀。
表達式中，空白字符 \n，\t，和 \f 總是被解釋成單個空格
格式變量
$~ 中 ($FORMAT_NAME) 格式名字
$^ ($FORMAT_TOP_NAME) 當前的表頭格式名字存儲在
$% ($FORMAT_PAGE_NUMBER) 當前輸出的頁號
$= ($FORMAT_LINES_PER_PAGE) 每頁中的行數
$| ($FORMAT_AUTOFLUSH) 是否自動刷新輸出緩沖區存儲
$^L ($FORMAT_FORMFEED) 在每一頁(除了第一頁)表頭之前需要輸出的字符串存儲在
注:這些變量以文件句柄為基礎設定，因此你需要 select 與特定格式關聯的文件句柄來影響這些格式變量
調用輸出
write
最后直接用write函數來顯示格式化的文本內容.
多頁報表
$% 當前輸出的頁面編號
$= 頁中的行數
$- 還有多少剩下的行數
在使用輸出時,最好建一個表的頂部輸出.這樣看起來會好看很多.
實例代碼：
復制代碼 代碼如下:
#!/usr/bin/perl
use strict;
use warnings;
my ($name,$login,$office,$uid,$gid, $home);
open FD,"/etc/passwd" or die "$?";
while(FD>){
($name,$login,$office,$uid,$gid, $home) = split (":",$_);
$^ = 'STDOUT_TOP';
$~ = 'STDOUT';
$= = 39;
write;
}
format STDOUT_TOP =
@>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
"Page $%"
Passwd File
Name Login Office Uid Gid Home
------------------------------------------------------------------
.
format STDOUT =
@ @||||||| @@>>>> @>>>> @
$name, $login, $office,$uid,$gid, $home
.
輸出如下
Page 3
Passwd File
Name Login Office Uid Gid Home
--------------------------------------------------------------------
sshd x 115 65534 /var/run/sshd
vde2-net x 116 128 /var/run/vde2
mysql x 117 129 MySQL /var/lib/mysql
oracle x 1001 1001 /usr/lib/oracle/xe
tomcat6 x 118 130 /usr/share/tomcat6
您可能感興趣的文章:- asp.net DataFormatString格式化GridView
- php Smarty date_format [格式化時間日期]
- jquery EasyUI的formatter格式化函數代碼
- 如何在UpdatePanel中調用JS客戶端腳本
- s:set 和 s:date 使用, 在jsp判斷日期
- js Date概念詳細介紹
- JS中Date日期函數中的參數使用介紹
- JS之Date對象和獲取系統當前時間詳解
- js字符串日期yyyy-MM-dd轉化為date示例代碼
- js用Date對象的setDate()函數對日期進行加減操作
- JS日期格式化之javascript Date format
