【perl腳本】域操作符 .. 在正則匹配和文本處理中的小技巧

最近才學會這種用法,使用場景如下,例如有如下文件待處理,我需要從中找出所有的函數定義的代碼,函數全部定義在def - pass區間內:

 

此時通過perl語言進行處理,通過域操作符 .. 配合正則匹配就可以完美解決這一問題:

 

執行結果:

 

可以發現域操作符以非貪婪的方式精確的找出了def - 最近的pass之間的代碼,完美符合我的需求。