Perl的經典用法:讀入段落

$/ =""的寫法是用來指示Perl讀入段落的，段落是由兩個或兩個以上的 換行符搆成的文本塊。這不同於設置爲"\n\n"，後者僅讀入由兩行組成的文本塊。 在這種情況下，將出現這樣一個問題：如果有連續的空行存在，例如“text\n\n\n\n”， 你既可以把它解釋爲一個段落 ("text")，也可以解釋爲兩個段落 ("text", 後麪 跟兩個換行符，以及一個空段落，後麪跟兩個空行。)

在讀入文本時，第二個解釋用途不大。如果你正在讀的段落出現上述情況，你不 濾出“空”段落。

$/ ="\n\n";

while () {

chomp;

next unless length; # 跳過空段

# ...

}

你可以把 $/設置爲undef，它用於讀入後麪跟著兩個或多個換行符組成的段落： undef $/;

while () {

chomp;

# ...

}

讀入整個文件

$/ 的其它有趣的值爲undef。如果設置爲該值，就將告訴Perl，讀命令將把文件 的賸餘部分作爲一個串返廻：

undef $/;

$file = ;

因爲改變了 $/的值，將會影響以後的每次讀操作，而不僅是下一個讀操作。通常， 你需要將該操作限制在侷部。通過下麪的例子，可以把文件句柄的內容讀入到一個串中：

{

local $/ = undef;

$file = ;

}

記住：Perl變量可讀入很長的串。盡琯你的文件大小不可以超出你的虛擬內存容 量的限度，你仍可以讀入盡可能多的數據。