變數:
$name = "kent";
print "my name is $name", " /n";
print 'my name is $name', " /n";
《出力結果》
my name is kent
my name is $name
注:單引號內變數不轉譯
$c = "abc";
$d = 3;
print $c x $d;
《出力結果》
abcabcabc
注:x乘固定重複n遍
$c = 123;
$d = 3;
print $c x $d;
《出力結果》
123123123
注:同上
陣列:(perl陣列變數名都以@開頭)
《出力結果》
orange
《出力結果》
この配列の要素は3個あります。
注:$#fruit $#變數名+1 = 陣列的大小
《出力結果》
この配列の要素は3個あります。
注:陣列名反應了陣列大小
注:向陣列中新增資料
@char = ("a", "b", "c");
push(@char, "d");
print "@char /n";
《出力結果》
a b c d
注:用push向陣列後加入元素
@char = ("a", "b", "c");
pop(@char);
print "@char /n";
《出力結果》
a b
注:刪除陣列中最後乙個元素
@char = ("a", "b", "c");
unshift(@char, "d");
print "@char /n";
《出力結果》
d a b c
注:在陣列頭新增資料
@char = ("a", "b", "c");
shift(@char);
print "@char /n";
《出力結果》
b c
注:刪除陣列頭的第乙個資料
@char = ("a", "b", "c");
@char = reverse(@char);
print "@char /n";
《出力結果》
c b a
注:陣列反轉.
@char = ("c", "a", "d", "b");
@char = sort(@char);
print "@char /n";
《出力結果》
a b c d
注:陣列排列
@char = ("c", "a", "d", "b");
@char = sort (@char);
print "@char /n";
《出力結果》
d c b a
注:按指定的格式排序
Perl 中文 字頻統計 Perl 例子
usr bin perl 如果在文字中使用大字符集,那麼將文字儲存成utf 8格式。並將下面的注釋標誌去掉,同時給後面的簡體中文編碼語句加注釋標記 use utf8 使用簡體中文編碼,否則拆分單個漢字會出錯。use encoding euc cn 如果不提供待統計文字,退出程式 die if arg...
perl幾個檔案操作例子
perl用的最多的地方就算是檔案處理了,下面我就總結了一下perl檔案操作的一些東西,並且有具體的例子,通過下面的例子,加強我們對perl檔案操作的理解。刪除檔案 使用unlinke函式,比如unlink file,unlink file1,file2,file3 開啟檔案 使用三引數的形式開啟檔案...
用Perl傳送郵件小例子
據傳,perl傳送郵件有很多方案,但我只會用mail sender這種方式,也就只能簡單談談這種方式。在參考眾多網頁後,程式書寫如下 usr bin perl w use mail sender my sender mail sender new or die can t send mail.n m...