前序

我們知道，do 'filename'是從文件里讀出內容然后執行其中的語句，返回最后一個表達式的值，還有perl特殊字符的就是

噔噔--??? $/ 啦， 只是起到分隔符的作用，即對匹配的字符分割。

?

好了說完了，正式入題，

如果在使用

      
        1
      
      
        my
      
      
        $pro
      
      =
      
        do
      
      
        {


      
      
        2
      
      
        local
      
       $/
      
        ;


      
      
        3
      
       <filename>


      
        4
      
      
        }


      
      
        5
      
      
        print
      
      
        $pro
      
      ;
    

• $/ 沒有賦值會怎樣，結果會出現什么。是的如果filename文件里只有一行字符，不好意思，沒有任何可見的影響，有n(n>2)行，可以看到會打印filename里的所有東西出來。

• $/ 進行賦值后，只會打印匹配至的字符串出來。

有意思吧，為什么那？local一個局部初始化變量的關鍵詞，那么在只是定義沒有初始化后，他值是undef ，用一個undef的值去分割字符肯定是沒有任何可以匹配的，所以就得到了所有的字符串

?

--ps關于perl內置的特殊字符在這里： http://www.cnblogs.com/ace9/archive/2011/04/29/2032755.html

do和$/一點組合使用