本文和大家重點討論一下Perl標量轉換函數的用法，比如，函數chop，它的調用語法是$lastchar=chop(var)，表示解說var可為變量或數組，當var為變量時，***一個字符被刪除并賦給$lastchar，當var為數組/列表時，所有元素的***一個字符被刪除，***一個元素的***一個字母賦給$lastchar。

Perl標量轉換函數

Perl標量轉換函數名 chop

調用語法$lastchar=chop(var);

解說var可為變量或數組，當var為變量時，***一個字符被刪除并賦給$lastchar，當var為數組/列表時，所有元素的***一個字符被刪除，***一個元素的***一個字母賦給$lastchar。

Perl標量轉換函數名 chomp

調用語法result=chomp(var);

解說檢查字符串或字符串列表中元素的***一個字符是否為由系統變量$/定義的行分隔符，如果是就刪除。返回值為實際刪除的字符個數。

Perl標量轉換函數名 crypt

調用語法result=crypt(original,salt);

解說用DES算法加密字符串，original是將要加密的字符串，salt是兩個字符的字符串，定義如何改變DES算法，以使更難解碼。返回值為加密后的串。

Perl標量轉換函數名 hex

調用語法decnum=hex(hexnum);

解說將十六進制數(字符串形式)轉化為十進制數。

Perl標量轉換函數名 int

調用語法intnum=int(floatnum);

解說將浮點數舍去小數部分轉化為整型數。

Perl標量轉換函數名 oct

調用語法decnum=oct(octnum);

解說將八進制數(字符串形式)或十六進制數("0x.."形式)轉化為十進制數。

Perl標量轉換函數名 ord

調用語法asciival=ord(char);

解說返回單個字符的ASCII值，與PASCAL中同名函數類似。

Perl標量轉換函數名 chr

調用語法$char=chr(asciival);

解說返回ASCII值的相應字符，與PASCAL中同名函數類似。

Perl標量轉換函數名 pack

調用語法formatstr=pack(packformat,list);

解說把一個列表或數組以在實際機器存貯格式或C等編程語言使用的格式轉化（包裝）到一個簡單變量中。參數packformat包含一個或多個格式字符，列表中每個元素對應一個，各格式字符間可用空格或tab隔開，因為pack忽略空格。

【編輯推薦】

1. Perl字符串處理函數用法集錦
2. Perl文件句柄概念詳解
3. Perl函數集-數組和Perl列表函數解析
4. Perl函數中Perl進程控制函數用法解析
5. Perl進程控制函數用法詳盡解讀