專家指導 Perl學習筆記
本文和大家重點討論一下Perl學習筆記，Perl是一種能完成任務的語言。從一開始，Perl就設計成可以把簡單工作簡單化，同時又不失去處理困難問題能力的語言。
Perl學習筆記
一、Perl基礎
1.常用命令
1.1perl–v顯示Perl版本，測試Perl是否安裝
1.2perldoc–tf<函數名>查找函數信息
1.3perldoc–q<key>查找FAQ
1.4perl是一種解釋型語言，不需要編譯；Python是虛擬機語言，要編譯。
二、Perl的構件：數據，字符串
1.轉義字符用\<symbol>表示
2.qq,q運算符，使用非字符或數字作為限定符
3.標題變量$<key>
4.chomp刪除換行符
5.<stdin>輸入設備
6.格式化字符串直接在字符串中引用標量
三、Perl控制程序流
1.空undef
2.last,redo,next都可以跟標號
3.exit0正常退出程序
四、Perl列表/數組
1.qw運算符聲明列表
2.定義范圍1..20
3.定義數組@<key>
4.引用數組元素$<key>[index]
5.查找數組大小$size=@array
6.$#foo***一個元素的索引號
7.localtime返回一個表示當前時間的時間元素列表
8.for,foreach$var(@array)
9.split函數
10.join函數
11.sort給數組排序
12.<=>飛船運算符
13.scalar函數，強制轉換為一個標量放入標量上下文，返回放入的數量
scalar@_;
五、Perl文件操作
1.die函數
2.$!用來在die函數中返回操作系統的出錯消息
3.warn
4.defined<>undef
5.$_foreach讀出的系統變量
例：
open(MYFILE,"c:/manifest.mf")||die"err:$!";#p#
六、Perl正則表達式
1.正則表達式中的元字符：
${}#^@|?.+*[\
2.將模式串括起來的字符可以是任意的元字符；除非使用非斜扛分隔符，否則可以不使用m。
3.用[]表示字符類
4.通配符{最少出現次數，***出現次數
5.特殊字符類
\w單詞字符
\W非單詞字符
\d數字
\D非數字
\s空白字符
\S非空白字符
6.選擇|
7.位置通配符
^一行開始
$一行結尾
8.替換
s/$searchpatten/replacement/;
9.修飾符
/g重復多次匹配
/I忽略大小寫
七、Perl哈希結構
1.用%聲明%hash=("k1","v1","k2","v2");
2.用=>分隔鍵和值聲明%hash2=("k1"=>"v1","k2"=>"v2");
3.引用哈希值$hash{"k1"}
4.用keys檢索哈希表的關鍵字
foreach(keys%hash){
print"$_\n";
}
5.用values檢索哈希表中所有值
foreach(values%hash){
print"$_\n";
}
5.reverse%hash轉換成列表，鍵值對換
6.哈希合并%h={%h1,%h2}
7.測試哈希值是否存在if(exists$hash(keyval))
8.刪除哈希值delete$hash(keyval)
9.刪除所有鍵值%hash={}
10.查找數組中的所有唯一元素
八、Perl函數
1.聲明函數
subsubFun{
for($i=0;$i<10;$i++){
print$i;
}
Return(true);
}
2.參數
@_表示隱含參數列表
$_[2]表示第二個參數
($hit,$bats)=@_
例：
subparamFun{
($a,$b)=@_;
print"\na=$a";
print"\nb=$b";
}
3.聲明函數內變量
My$y=500;
九、Perl中其它函數和運算符
1.indexstring,substring
2.rindexstring,substring
3.substrstring,offset,length
可用于替換字符串
4.tr/searchlist/replacelist/轉換運算符
tr/a-z/A-Z/;把大寫轉換為小寫
$num=tr/0-9//;計算數字的數量
5.=~運算符
代替默認環境變量
$b=$a=~s/a/b/;把$a中a替換為b，賦值給$b
6.printf,sprintf格式化輸出函數#p#
十、Perl操作文件和目錄
1.opendirTEMPDIR,’c:/’
2.readdir返回的文件名不包含路徑名
3.closedir(TEMPDIR);
4.Glob函數查詢文件返回的文件名帶路徑
5.grep查詢文件返回的文件名不帶路徑
6.chdir
7.mkdir
8.rmdir只刪除完全是空的目錄
9.unlink刪除目錄下所有文件，并返回文件數量
10.rename
11.Example:
12.chmod賦予權限
13.statfilename;statfilehandle返回文件句柄信息
#打開目錄下的所有txt文件
- opendir(TD,"C:/TEMP")||die"error:$!";
- @FILES=grep(/\.txt$/,readdirTD);
- foreach(@FILES){
- print$_;
- openFILEH,"C:/TEMP/$_"||die"can'topenfile:$!";
- foreach(<FILEH>){
- printscalar($_);
- }
- }
- @files=glob("C:/TEMP/*.txt");
- foreach(@files){
- print$_;
- }
十一、Perl系統互操作性
1.system調用操作系統命令，正常返回0;返回1.
十二、Perl中DBM文件
1.DBM文件是與perl哈希結構聯系在一起的文件結構。
2.將哈希結構與dbm關聯起來
Dbmopen(hash,filename,mode);
3.each函數，對較大的哈希結構迭代操作
($key,$val)=each(%h);
4.open的限定符
<file只讀
>file只寫,不存在創建,重寫
>>只寫，創建，追加
5.隨機讀取文件
Seek(fileHandle,Offset,相對位置)函數
6.鎖定UNIX和NT下的文件
Flock(FILEHANDLE,locktype);
FL_SH公共鎖
FL_EX專用鎖
7.讀寫鎖控制：設置一個信標文件
十三、Perl引用和結構
1.創建對變量的引用
$ref=\$a;
2.輸出地址引用的值
Print$$ref
3.對數組和哈希表的引用
$$a[0]
@$a
%$a
$$a{xx}
4.列表中的列表
@list_of_lists={[qw(xxx)],[qw(ddf)]};
5.遍歷數組
foreachmy$outer(@list_of_lists){
print$outer;
foreachmy$inner(@($outer)){
print$inner;
}
}
十四、Perl使用模塊
1.use引用其它模塊
例：cwd獲取環境變量
Strict改變程序運行特性，使之對引用和裸單詞變得嚴謹
十五、Perl歷史
定位于解釋型語言，適合作為CGI語言
【編輯推薦】
