Perl

1. Perl“膠水”，能夠將各種應用程式或者各種語言的代碼結合起來。Perl可以編寫普通的指令碼程式，還可以使用cgi模組編寫Web應用程式，同時可以使用DBI訪問各種資料庫。除此之外，Perl可以將各種層次的應用程式粘在一起，發揮更強大的功能。2.前台是一個網站Web應用程式，底層或者是後台是用C，C++或者Java編寫，使用Perl可以將兩者對接起來，實現更強大的功能，發揮各自的優勢。Perl實現該方法的途徑有兩個：1)

用Open() 函數開啟檔案開啟檔案的常用方法是:複製代碼 代碼如下:open(FH, "< $filename")or die "Couldn't open $filename for reading: $!";open()

有時遇到各行或各列的長度不一致時就麻煩了，雖然可以在R裡面把檔案按最長的行(列)填充，但是不便，所以想起用perl去實現一個。由逗號分隔的不定長度的文字檔, 現要實現行列轉置, 即由複製代碼 代碼如下:1,2,3,4,5,6,7,8,9,10,11,12,13,轉換為：1,7,10,2,8,11,3,9,12,4, ,13,5, , ,6, , ,以下是完整的代碼，供大家參考。複製代碼 代碼如下:#!/usr/bin/perl -wmy @matrix;my $max_len

1. 語句塊：{ }之間的部分即為BLOCK語句塊。2. 條件陳述式：if ( expression ) BLOCK;if ( expression ) BLOCK1else BLOCK2;if ( expression1 ) BLOCK1;elsif ( expression2 ) BLOCK2;else BLOCK3;#倒置的if語句expression if ( test_expression );涉及到的關係運算子：數字值比較：==, >, <,

1.Perl將一般的變數成為標量，該變數可以指代的直接量包括兩種：數字直接量；字串直接量。a) 字串的表示方法：單引號，單引號中的字串中的含義直觀，不需要求變數值和逸出字元；雙引號，需要求變數值和逸出字元值。如果需要消除，通常需要在前面添加反斜線，其中的單引號或雙引號也需要。b) 此外，可以使用qq或q分別代替雙引號或單引號，界限符可以用成對的(), <>, {}, []等。2.

1. 一次性將檔案中的所有內容讀入一個數組中(該方法適合小檔案)： 複製代碼 代碼如下:open(FILE,"filename")||die"can not open the file: $!";@filelist=<FILE>;foreach $eachline (@filelist) { chomp $eachline;}close FILE;@filelist=<FILE>;當檔案很大時，可能會出現"out of memory"錯誤。2.

1、單行(大檔案處理)：複製代碼 代碼如下:my $oneline = <$FL> 或while（$line=<H>）{ }2、讀取全部(小檔案處理)： 複製代碼 代碼如下:open (my $in, "path ") or die "open error: $! "; my @lines = <$in> ;3、讀3行(大檔案及特殊處理需要)： 複製代碼 代碼如下:open (my $in, "path ") or die "open error: $! ";

讀檔案：複製代碼 代碼如下:#!perlopen filetxt,"/path/a.txt"; # filetxt為檔案控制代碼，用於和檔案a.txt建立連結。檔案控制代碼可任意取名，但不要和Perl內建的幾個檔案控制代碼重名。print <filetxt>; # 此處print函數用於顯示檔案a.txt的內容。<>為取行操作符，<檔案控制代碼>用於讀取所連結檔案的內容。close filetxt;

用Open() 函數開啟檔案開啟檔案的常用方法是:複製代碼 代碼如下:open(FH, "< $filename") or die "Couldn't open $filename for reading: $!"; open()

一、開啟、關閉檔案 open的傳回值用來確定開啟檔案的操作是否成功，當其成功時返回非零值，失敗時返回零，因此可以如下判斷： if (open(MYFILE, "myfile")) { # here is what to do if the file opened successfully } 當檔案操作完畢後，用close(MYFILE); 關閉檔案。 讀：open(檔案控制代碼，"<檔案名稱") open(檔案控制代碼，"檔案名稱"

一、數組應用複製代碼 代碼如下:#!/usr/bin env perl@zeng = `top -b -n 1`;foreach (@zeng) {print "$_\n";}二、say的用法：自動換行複製代碼 代碼如下:#!/user/bin env perluse 5.010; #表示使用perl 5.10的版本。say "Hello World!";my @fred = above_average(1..10);print "\@fred is @fred\n";print

刪除檔案使用unlinke函數，比如unlink $file， unlink $file1, $file2, $file3開啟檔案使用三參數的形式開啟檔案，這樣非常便於區分模式和檔案名稱，perl 5.6之後的版本都支援這種方式。複製代碼 代碼如下:#Open the 'txt' file for readingopen FH, '<', "$file_name.txt" or die "Error:$!\n";#Open the 'txt' file for writing.

Perl利用函數rand()和srand()為隨機數（更確切的說是"偽隨機數"）字串的產生提供了基本的工具。這些函數不是利用加密來提供安 全性的，所以不要利用它們為你金融資訊的加密。但是，如果你需要為你的下一個遊戲或者動態Web網站的新特性設計一個簡單的隨機數產生器，那麼 rand()和srand()可能就是你所需要的。函數rand()是真正的隨機數產生器，而srand()會設定供rand()使用的隨機數種子。函數rand()會返回一個處於0和你所指定的數

一、Regex特殊變數1、$n 　　:包含上次模式比對的第n個子串2、$& 　　:前一次成功模式比對的字串3、$`　　 :前次匹配成功的子串之前的內容4、$'

複製代碼 代碼如下:#!/usr/bin/perl## 用grep map 擷取兩個列表的交集並集、補集#use strict;my @a=("a","b","c","d","e");my @b=("b","g","f","e");print "列表a資料： @a \n";print "列表b資料: @b \n";my %a = map{$_ => 1} @a;my %b = map{$_ => 1} @b;my @c = map{$_ => 1} @a; #

在Linux或者Unix上操作（產生）Excel，CPAN上提供了Spreadsheet::WriteExcel 和 Spreadsheet::ParseExcel這兩個模組。 下面就來看看 Spreadsheet::WriteExcel 和 Spreadsheet::ParseExcel的使用方法。 首先，要在伺服器上安裝相應的模組。 安裝 Excel 模組的 PPM 命令 複製代碼 代碼如下:ppm> install OLE::Storage_Lite ppm> install

一．資料類型(Data type)： Perl 的資料類型大致分為四種：Scalar（變數）、Scalar Array（數組）、Hash Array（散列）、References（指標），看起來雖少但用起來卻綽綽有餘。尤其在寫Perl程式時可以不必事先宣告變數，這一點對剛學程式語言的人甚為方便，不過為了以後程式除錯和維護方便，我建議你還是養成事先聲明變數的習慣比較好。1 Scalar（純量變數）：

常用系統函數列表 指令：print文法：print Filehandle LIST說明：這個Filehandle可以看作在I(INPUT)/O(OUTPUT)之間的一個橋樑,可以利用FILEHANDLE來做出資料讀入寫出的動作.STDIN是代表從哪連輸入資料,例如從電腦的鍵盤輸入;STDOUT是代表從哪連輸出資料;例如從電腦的螢幕輸出;STDERR是代表從哪連輸出錯誤的資料,例如從電腦的螢幕輸出.而在PERL語言中有三個標準FILEHANDLE：

首先來看看 POSIX 風格Regex的兩個主要函數： ereg 函數：（Regex匹配） 格式：int ereg ( string pattern, string string [, array &regs] ) 注意：使用 Perl 相容Regex文法的 preg_match() 函數通常是比 ereg() 更快的替代方案。（一般的話還是使用 preg_match() ，比較好勒~~） 以區分大小寫方式在 string 中尋找與給定的Regex pattern

Perl 的相比起來還是少.看視頻，在入門時還是相當方便的，就象電影來看就好了。我基本 Superor 老師每出一集我都看了。希望大家也認真看看。記的，學習時要多寫,只能看明白,只有 5% 是你的，練習都做一做,就有 30% 是你的啦。其它的如果能根據教程，自己寫出自己要的程式，才 80% 是你的.再次感謝 Superor 老師.注意下面的內容，如果加 .zip 可以直接下載的。例如:http://www.boobooke.com/v/bbk2869.zip第1集：第一章