求perl的指令碼,求一個perl的指令碼

2021-07-22 09:07:01 字數 1365 閱讀 4768

1樓:

你的程式沒有問題的啊,要是替換多個短語加個for就好了$| = 1;

chomp(my $keyword = <>);

while()

__data__

123 123 456

789 123

456 123 33

while (<>)

while()

print $_;}

2樓:泰暎

#!/usr/bin/perl -w

use strict;

die "perl $0 \n" unless(@argv == 2);

open in,$argv[0] || die "開啟輸入檔案失敗\n";

open out,">$argv[1]" || die "開啟輸出檔案失敗\n";

while()

if($_=~/^type/)

if($_=~/^retained introns/)

}close in;

close out;

執行的時候,假設你儲存為指令碼runpick.pl

輸入檔名為 input.txt 輸出檔名為output.txt

那麼執行時直接:perl runpick.pl input.txt output.txt

執行結束之後,螢幕會回顯你要的那幾行資訊以及將你要的資訊儲存到output.txt裡面。如果還有其他疑問,請補充提問

求perl寫一個處理文字的指令碼

3樓:陽光上的橋

open(fd,"1.txt");

while($s=)

close(fd);

perl,我想用perl寫個小指令碼

4樓:你猜我猜哇擦猜

如果是windows,裝一個perl軟體

如果是linux,基本都已經裝好了的。開啟檔案編輯器,寫好程式後儲存*.pl

再雙擊執行,或者開啟命令介面輸perl *.pl執行

5樓:匿名使用者

5條報文格式是什麼樣的。請提供樣板

急急急。。per 指令碼求助。我是一個新手,我想寫一個perl指令碼,具體需求我寫在補充裡面了,跪求大神幫忙。

6樓:匿名使用者

|line=`ps aux |grep tomcat|grep -v grep|wc -l`

if [ "$line" -ge "1" ]then

echo "ok"

else

echo "not exist"fi

求vb的求數平方的程式設計,求一個vb的求一個數平方的程式設計

樓主您好!什麼也不用畫,直接複製貼上 簡單就一句 msgbox 這個數的平方為 val inputbox 請輸入要求平方的數 提示視窗 2 64 vbokcancel vbdefaultbutton1,提示視窗 多寫點就這樣 dim number1 as double dim number2 as ...

求按鍵精靈特別簡單的指令碼,求1個按鍵精靈特別簡單的指令碼

這是指令碼的源 也沒留地方給你傳 那就只能貼源 了 general syntaxversion 2 beginhotkey 121 beginhotkeymod 0 pausehotkey 0 pausehotkeymod 0 stophotkey 123 stophotkeymod 0 runon...

求很老的手機單機,忘記了,求一個一個很老的手機單機,忘記了

射擊類遊戲以前功能機上的,一個人控制四人小隊,一個呼叫轟炸,一個排雷,一個醫療兵,一個射擊掩護,人只能一個個前移,有誰知道求告知一下,最近非常想玩,謝謝!射擊類遊戲以前功能機上的,一個人控制四人小隊,一個呼叫轟炸,一個排雷,一個醫療兵,一個射擊掩護,人只能一個個前移,有誰知道求告知一下,最近非常想玩...