看例子學perl

2021-05-05 20:53:04 字數 1850 閱讀 8314

變數:

$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...