Perl語(yǔ)言入門第四版

在作者群多年教授Perl的經(jīng)驗(yàn)之下，“小駱駝書(shū)”以新的面貌重生了，既能讓初次接觸Perl的讀者容易理解，又保留了翔實(shí)的討論、齊全的范例以及著名的巧思妙語(yǔ)。
本書(shū)加入了許多新的習(xí)題與解答，讓讀者能夠趁記憶猶新之際鍛煉所學(xué)到的技巧。
本書(shū)內(nèi)容涵蓋：
● Perl的變量類型
● 文字的處理
● 子例程
● 字符串與排序
● 文件的操作
● 進(jìn)程的管理
● 正則表達(dá)式
● 模塊的使用
如果你問(wèn)今日的Perl程序員，當(dāng)初他們學(xué)習(xí)Perl的時(shí)候最值得信賴的參考書(shū)是哪一本，你會(huì)發(fā)現(xiàn)“小駱駝書(shū)”就是絕大多數(shù)的答案。原因不證自明，其他的書(shū)也許會(huì)教你如何寫(xiě)出Perl程序，但本書(shū)卻能將你造就成真正的Perl程序員。

目錄
前言： 8
第一章概述9
1．1 問(wèn)題和解答9
1．1．1 本書(shū)適合你嗎？ 9
1．1．2 為什么如此多的腳注？9
1．1．3 練習(xí)題和解答呢？ 10
1．1．4 習(xí)題前的數(shù)字是什么意思？ 10
1．1．5 如果我是Perl 教師，怎么辦呢？ 10
1．2 Perl 代表什么？ 11
1．2．1 Larry 為什么發(fā)明Perl？11
1．2．2 為什么Larry 不采用別的語(yǔ)言？ 11
1．2．3 Perl 容易學(xué)習(xí)嗎？ 12
1．2．4 Perl 為什么如此流行？13
1．2．5 Perl 正在發(fā)生怎樣的事情？13
1．2．6 Perl 擅長(zhǎng)什么？ 13
1．2．7 Perl 不擅長(zhǎng)什么？ 14
1．3 怎樣獲得Perl？ 14
1．3．1 什么CPAN？ 14
1．3．2 怎樣獲得支持？ 15
1．3．3 有其它的支持嗎？ 15
1．3．4 當(dāng)發(fā)現(xiàn)Perl 中有錯(cuò)誤時(shí)，該怎么辦？ 16
1．4 怎樣才能寫(xiě)一個(gè)Perl 程序？16
1．4．1 一個(gè)簡(jiǎn)單的例子17
1．4．2 這個(gè)程序有些什么？ 18
1．4．3 怎樣編譯Perl？ 19
1．5 快速了解Perl 19
1．6 第六節(jié)練習(xí)20
。。。
perl語(yǔ)言入門第四版第五章習(xí)題
1.寫(xiě)一個(gè)程序,類似于 cat,但保持輸出的順序關(guān)系。如果運(yùn)行此程序:./tac fred barney betty, 輸出將是文件 betty 的內(nèi)容,從最后一行到第一行,然后是 barney, 最后是 fred, 同樣是從最后一行到第一行。 (注意使用 ./確保調(diào)用的是你自己的程序,而非系統(tǒng)提供的)

我的第一個(gè)想法是將每一行輸入到數(shù)組，然后再?gòu)臄?shù)組輸出：

#!/usr/bin/perl -w
my@arr;
while(<>){
unshift @arr,$_;
}
print @arr;

一次將所有文件都輸入到數(shù)組里不是個(gè)好方法，于是改成每次一個(gè)文件：

#!/usr/bin/perl -w
my $file=pop@ARGV;
while($file){
open FILE,"$file";
@arr=<FILE>;
chomp @arr;
printf "%s\n"x@arr,reverse@arr;
$file=pop@ARGV;
}

如果碰到大文件這也不個(gè)好辦法，一時(shí)想不出招了。