1樓:笨自己
函式大體如下。要寫完美要自己加工。
#! /
my %function_bash;
my %function_begin = (『functionname』=> '',
'begin_row' => '');
my %function_end = (
『functionname』=> '',
'end_row' => '');
our $kuohaosu=0;
my $i=1;
open $out,檔案;
while ($out)
if(/\
if(/\}/})
if($kuohaosu==0)
}以上得到函式的起行數和結尾行數。
abc/*12324abcwfd*/efd在這裡面a的位置確定方法?根據行號和列號,那麼你對就加入的位置很明確,可以不用考慮註釋,但如果a為一個函式,這時,我們可以通過正則在這個函式中查到函式所處的行,然後根據函式開始行到當前行之間查詢"/*",如果存在,查到*/,如無,則當前位置為註釋中,跳出,查到下一個。也可以用/*和*/出現的次數來確定。
比如果出現三次/*,二次*/,v那麼當前關鍵字所處位置是在註釋中,如果/*次數等*/,所處位置可以插入資料。統計在函式中/* 和 */用index函式可以輕鬆完成。
2樓:匿名使用者
樓上 的實現方法有些繁瑣,直接 範圍操作符會更好點。
while()/)
在perl指令碼語言下如何修改檔案內容
你這問題問的不清楚,你給的例子裡面也只處理了10轉28,而且目前你這個寫法,110 也會被轉化為128,最重要的是,你這 完全不能修改你的檔案,因為你 foreach kill new 這個只是對臨時變數 kill處理了。完全沒有對 new改動,所以再把new的內容寫到file2沒有意義。open ...
VB6 0 檔案操作,vb6 0對txt檔案操作
哪種資料型別都能放的,只是相對操作效能有區別,二進位制可以讀寫任何檔案,比如一個壓縮包就可以用二進位制檔案讀入加密後再儲存。其操作速度較快 隨機檔案可以讀取任意位置的單個資料,非常靈活,速度最快。文字檔案操作較直觀,直接用記事本就可開啟編輯 vb6.0對txt檔案操作 vb6.0關於.csv檔案的操...
perl中代表了什麼意思,請問在Perl語言裡面 代表什麼意思?
為輸入記錄分隔符,預設為換行符。該變數會影響 perl對 行 這一概念的理解。其功能類似於 awk 中的 rs變數,在被設定為空字串時同樣會將空白行作為終止標誌。空白行不能含有任何空格或製表符。你可以將其設定為含有多個字元的字串,以匹配多字元的終止標誌 也可以設為 undef 以便一直讀到檔案結束。...