PERL檔案操作

時間 2022-08-02 14:25:07

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 以便一直讀到檔案結束。...