Perl

     在 PERL 開發中，通常可以用 system 函數或  `` 操作符來執行系統命令，但注意對 alias, bg, bind, break, builtin, cd, command, compgen, complete, continue, declare, dirs, disown,       echo,

http://developer.51cto.com/art/201007/213719.htm http://www.ibm.com/developerworks/cn/linux/sdk/perl/culture-4/index.html http://www.sdsc.edu/~moreland/courses/IntroPerl/docs/manual/pod/perldebug.html#NAME

    在文本處理時經常會碰到這樣的情況：有一批檔案需要修改裡面的內容，但是又希望保留原來檔案的內容。這個時候Perl提供了一個很方便的變數$^I，將需要備份檔案的尾碼儲存在該變數後，我們在修改檔案內容時，Perl會： 1、先將原檔案開啟並另存新檔以“原檔案名稱+$^I存放的尾碼字元”為檔案名稱的備份檔案。 2、在原檔案上修改。 例如下面一段程式，我要將所有.dat文本中的abc改為dfg，並備份成.bak的檔案

######################read()函數中的offset參數含義 read (FILEHANBD, $var, $length, $offset) read 函數有四個參數，最容易誤解的是$offset 它的含義看官方文檔，解釋是: An OFFSET may be specified to place the read data at some place in the string other than the beginning. A

Perl 代碼實現： #!/usr/bin/perluse strict;use warnings;use diagnostics;open(LOG, '>', 'LOG_FILE') or die "Can't redirect stdout: $!";open(CMD, 'ls |');open(STDERR, '>&', STDOUT) or die "Can't redirect stderr:

1、命名分組格式為(?<grp name>)，反向引用時用\k<grp name> 2、命名分組的匹配的結果存在在變數%+變數中，取命名分組值，$+{grp name}. 3、反向引用也可以用\g1,\g{1},\g{-1},\g{-2}等，負表示分組的倒數每幾個分組. 例： 方法1： local $_  ='Buster and buster'; if(/(\S+) (and|or) \1/i) {print "I

在perl語言中，有兩個特殊而常用的符號qq qw,分別解釋如下： qq{foobar}的意思為意思為雙引號字串，可插入變數 相當於 "foobar" qw{foo bar}的意思為用空格分解字串，得到列表，相當於如下語句 split(' ','foo bar') 得到的結果是'foo','bar' 字串比較等於用 eq q運算子對'號轉義的方式 $someword = 'i \'ve some money';

正常情況下，需要退出的時候才會把命令寫入，加入參數-w會立馬寫入。 這個profile是Linux重要的環境變數設定檔。 命令補全： 輸入user後兩次tab鍵就會列出所有user開頭的檔案。 這種別名重啟後就會失效，所以開啟   .bashrc  檔案進行修改即可。 自己定義了一個  ll 命令，就是下面的這個，帶顏色的。 列印出環境變數，前面加個 &

平時也是偶爾用用，比較零散，稍為不留神便與shell,sed,awk有些混在一起感覺，心想還是打好基礎，認清功能為先； 於是開始... 今天先列個題綱要學習的內容： 1.什麼是perl? 2.它用來做什麼。 3.如何學會它。 4.需要掌握的知識點    4.1   代碼執行格式    4.2   文法    4.3   命令

標籤：設計者   解譯器   無法   log   其他   blog   展開   指定   install   Perl簡介Perl，一種功能豐富的電腦程式語言，運行在超過100種電腦平台上，適用廣泛，從大型主機到可攜式裝置，

如果字串結尾有分行符號，chomp 可以去掉它。這基本上就是它能完成的所有功能，如下例：$text = “a line of text/n”; #也可以由<STDIN>輸入chomp($text); #去掉分行符號(/n)。它非常有用，基本上你的每一個程式都會用到它。如你將知道，這是將字串末尾分行符號去掉的最好方法。基於Perl 中的一條基本原則：在需要使用變數的地方，可以使用賦值運算式來代替。我們有更簡單的使用chomp 的方法。Perl

1.    一個給定的運算式在不同的上下文中 其含義是不同的2.    在標量context中,nums返回他的元素個數,在列表context中,返回他的元素3.    print @nums;將不會用空格分隔各元素,除非print "@nums";4.    print nums;會直接將其作為列表,而不是標量5.    如果一個標量運算式使用在列表context中,將會把標量轉換為只有一個元素的列表來使用6.    將數組置空的正確方法 @nums = ();7.    print

1.  寫好代碼, #chmod 755 檔案名稱,就可以直接運行2.  也可以調試, #perl -M 檔案名稱3.  轉移字元只在雙引號字串中起作用, 標量變數插入亦同4.  標量變數直接使用,以$開頭5.  字串串連使用 . 6.  在變數前使用/,變數不會被插入,"/$變數名"7.  使用{}將變數括起來,可以保證匹配8.  2**3,2的3次方 //真是太方便了9.  運算子左結合先算左邊,右結合就先算右邊

使用Regex處理檔案1.   s///,s/abc/fred/  先匹配abc,如果匹配上,使用fred替換abc;如果沒有匹配上,則什麼都不做2.   s///g,全域替換,s/abc/fred/g,將所有abc都替換成fred3.   可以使用其他符號替代/作為分隔字元4.    /six同樣適用5.    $_ = “I saw Barney with Fred.”;       $_ =  s/(fred|barney)//U$1/gi;                    #

1.   由於每一個 hash 都有一個私人的迭代器(iterator),因此,使用 each 的迴圈是可以嵌套的,因為不同的 hash有不同的迭代器(iterator).雖然這隻是腳註,但我們也應當告訴你,你可以通過使用 keys 或 values函數,重設迭代器(iterator).如果新列表加入到此 hash 中,或者 each函數迭代到最後一個元素,也會重設迭代器(iterator) 另一方面,如果在迭代時加入新的

1.    unless語句,if是條件為真時執行,unless是條件為假時執行2.    縮寫語句.&error("Invalid input”) unless &valid($input); $i *= 2 unitl $i > $j;  print “” ,($n += 2) while $n <10;  &greet($_) foreach @person;3.    裸塊(The Naked Block),這通常是為臨時變數提供範圍.4.   

perl中的Regex 1.    .是萬用字元,可以匹配任意的單字元,分行符號除外,如果要在模式中用到.,則使用/.即可2.    *可以匹配前一項0次或任意多次,比如/ab*c/匹配 ac,abc,abbbbbc...3.   +可以匹配前一項1次或任意多次,比如/ab+c/,匹配 abc,abbc,abbbbc...4.    ?意思是前面一項出現1次或者不出現,比如/ab?c/,匹配abc,或者ac5.   

1.   數組名可以和標量名相同  //不怕自己昏頭就用吧=.=2.   數組越界僅僅只是值為undef3.   底線僅僅起將長數字劃分的作用4.    數組最後一個元素的索引值為$#array5.    嗷~~支援負索引值! 比如,3個元素的數組,-1索引為第三個,-2為中間的,-3為第一個6.    負索引越界會產生嚴重錯誤..=.= fatal error!7.    列表, .. 是範圍操作符(range operator),比如(1..100),表示1到100,整數列表8.    ..

1.   子程式(入鄉隨俗?),調用的時候以&開頭,以區別於$和@2.   子程式塊中的標量,不做修飾,將是全域的,一個檔案中多次調用該子程式,將能多次修改該標量3.   子程式中最後一步計算的運算式的值將會作為傳回值...(真TM是個懶人)4.   子程式的參數列表居然是調用的時候才給出!!!儲存在@_中5.   子程式中使用my語句建立私人變數,比如 sub max{ my($m,$n)= @_; $m>$n?$m:$n;}6.   不能在同一範圍中重複定義變數7.  

1.    >清空檔案資料,重寫;>>追加在檔案末尾2.    最好在不使用一個檔案控制代碼時就立刻將它關閉 ,無論程式是否立即結束3.    $! 表示系統產生的一些可讀的資訊,如許可權不夠,檔案不存在等;它所包含的資訊,僅對系統請求失敗時有效4.    作為一般規則(die語句),如果用法錯誤則在訊息後面加上分行符號;如果是其它錯誤,需要利用它來調試,則不要加上分行符號5.    warn與die的去被在於,warn不會使程式退出6.    只有 Perl