 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 5 | 1/1 | 返回列表 |
| 查看: 1630 | 回復(fù): 5 | |||
| 當(dāng)前只顯示滿足指定條件的回帖，點擊這里查看本話題的所有回帖 | |||
[求助]
請教Windows系統(tǒng)下perl腳本的ARGV應(yīng)用問題，謝謝
|
|||
|
在Windows Xp，Perl腳本文件make_FENE.pl如下： #! C:\strawberry\perl\bin\perl.exe sub PAR { open(P,"> _parameter" ); print P< BD = .$BD. BDzeta = $BDzeta MDblocks = $blocks MDsteps = $steps T = $T dt = $dt FENECdist = $FENECdist shearrate = $shearrate / EOF }; $OK=0; $BDzeta = "0.0"; $shearrate = "0.0"; foreach $i (0 .. $#ARGV) { ($quant,$value) = split(/=/,$ARGV[$i]); if ($quant eq "BD" ) { $BD=$value; $OK=$OK+1; }; if ($quant eq "blocks" ) { $blocks=$value; $OK=$OK+1; }; if ($quant eq "steps" ) { $steps=$value; $OK=$OK+1; }; if ($quant eq "T" ) { $T=$value; $OK=$OK+1; }; if ($quant eq "dt" ) { $dt=$value; $OK=$OK+1; }; if ($quant eq "FENECdist" ) { $FENECdist=$value; $OK=$OK+1; }; if ($quant eq "BDzeta" ) { $BDzeta=$value; $OK=$OK+1; }; if ($quant eq "shearrate" ) { $shearrate=$value; }; if ($quant eq "Np" ) { $Np=$value; }; if ($quant eq "boxx" ) { $boxx=$value; }; if ($quant eq "boxy" ) { $boxy=$value; }; if ($quant eq "boxz" ) { $boxz=$value; }; }; PAR； 在CMD窗口的當(dāng)前目錄下直接 perl make_FENE.pl, 生成_parameter文件: &LIST BD = .. BDzeta = 0.0 MDblocks = MDsteps = T = dt = FENECdist = shearrate = 0.0 / 但是我希望怎樣在窗口能夠出現(xiàn)命令行如 BD = 然后我在鍵盤上敲入這個值，依次類推，最后生成的_parameter里的數(shù)值是由我鍵盤輸入的。上述的腳本應(yīng)該怎么改進，請大家?guī)蛶兔�，非常感謝！ |
回復(fù)此樓» 猜你喜歡
284求調(diào)劑
已經(jīng)有10人回復(fù)
-
一志愿山東大學(xué)藥學(xué)學(xué)碩求調(diào)劑
已經(jīng)有4人回復(fù)
-
07化學(xué)280分求調(diào)劑
已經(jīng)有4人回復(fù)
-
298-一志愿中國農(nóng)業(yè)大學(xué)-求調(diào)劑
已經(jīng)有12人回復(fù)
-
求材料，環(huán)境專業(yè)調(diào)劑
已經(jīng)有3人回復(fù)
-
335求調(diào)劑
已經(jīng)有5人回復(fù)
-
求調(diào)劑
已經(jīng)有7人回復(fù)
-
一志愿吉大化學(xué)322求調(diào)劑
已經(jīng)有4人回復(fù)
-
環(huán)境學(xué)碩288求調(diào)劑
已經(jīng)有8人回復(fù)
-
341求調(diào)劑(一志愿湖南大學(xué)070300)
已經(jīng)有6人回復(fù)
» 本主題相關(guān)價值貼推薦，對您同樣有幫助:
- 請教各位關(guān)于研究計劃的一些問題？在線等。。。
已經(jīng)有10人回復(fù)
- 請教幾個關(guān)于電沉積的最初級的問題，還請各位不吝賜教
已經(jīng)有5人回復(fù)
- 請教一個電化學(xué)中關(guān)于擴散控制和吸附控制的問題，很急，謝謝了
已經(jīng)有9人回復(fù)
- 虛心請教藥理學(xué)實驗的問題，望各位熱心的蟲蟲解答！
已經(jīng)有9人回復(fù)
- 請教個鋰離子電池充放電的問題
已經(jīng)有19人回復(fù)
- 最近跑了幾個DGGE，出現(xiàn)一些問題，請教大家
已經(jīng)有11人回復(fù)
- 關(guān)于感受態(tài)制備問題請教
已經(jīng)有13人回復(fù)
- 請教一個分子優(yōu)化的問題 四個判據(jù)
已經(jīng)有7人回復(fù)
- 請教個不等式的問題
已經(jīng)有4人回復(fù)
- 請教一個應(yīng)用read時出現(xiàn)數(shù)組越界的問題，謝謝
已經(jīng)有7人回復(fù)
- 【求助】請教乳液聚合制備聚苯乙烯的分解溫度問題
已經(jīng)有8人回復(fù)
★
jjdg(金幣+1): 歡迎討論 2012-02-08 23:32:56
jjdg(金幣+1): 歡迎討論 2012-02-08 23:32:56
|
謝謝，問題解決了，我用這樣的： perl make_FENE.pl BD=false blocks=10 steps=500 T=1.0 dt=0.005 FENECdist=1.20 shearrate=0 就可以了，剩下一個小問題是 sub PAR { open(P,"> _parameter" ); print P< BD = .$BD. BDzeta = $BDzeta MDblocks = $blocks MDsteps = $steps T = $T dt = $dt FENECdist = $FENECdist shearrate = $shearrate / EOF }; 如果我要生成的_parameter文件放在某個確定的目錄下，比如 D:\perl\document, 該怎么改呢？ |
4樓2012-02-07 18:18:49
【答案】應(yīng)助回帖
★
感謝參與，應(yīng)助指數(shù) +1
xzhdty(金幣+1): 歡迎討論交流 2012-02-07 23:39:42
感謝參與，應(yīng)助指數(shù) +1
xzhdty(金幣+1): 歡迎討論交流 2012-02-07 23:39:42
|
樓主你好，如果我沒有理解錯的話你的意思是想接收鍵盤的輸入，并將該值賦給變量，變量接收鍵盤輸入可以使用“$變量名= if(chomp($num= print "read from stdin error\n"; }else{ print "num=[$num]\n"; } chomp函數(shù)的功能請樓主自己百度，下面的代碼可以測試chomp的作用： $test= print "[$test]\n"; chomp($test); print "[$test]\n"; |
2樓2012-02-07 15:12:21
3樓2012-02-07 15:13:31
5樓2012-02-07 18:27:11
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 一志愿山東大學(xué)藥學(xué)學(xué)碩求調(diào)劑 +3 | 開開心心沒煩惱 2026-03-23 | 4/200 |
|
|---|---|---|---|---|
|
|
[考研] 材料專業(yè)求調(diào)劑 +11 | hanamiko 2026-03-18 | 11/550 |
|
|
[考研]
 0854 考研調(diào)劑 招生了！AI 方向
+4
|
pk3725069 2026-03-19 | 16/800 |
|
|
|
[考研] 材料/農(nóng)業(yè)專業(yè)，07/08開頭均可，過線就行 +3 | 呵唔哦豁 2026-03-23 | 4/200 |
|
|
|
[考研] 269求調(diào)劑 +4 | 我想讀研11 2026-03-23 | 4/200 |
|
|
|
[考研] 306求調(diào)劑 +9 | chuanzhu川燭 2026-03-18 | 9/450 |
|
|
|
[考研] 276求調(diào)劑。有半年電池和半年高分子實習(xí)經(jīng)歷 +8 | 材料學(xué)257求調(diào)劑 2026-03-23 | 9/450 |
|
|
|
[考研]
一志愿070300浙大化學(xué)358分，求調(diào)劑！
+4
|
酥酥魚.. 2026-03-21 | 4/200 |
|
|
|
[考博] 招收博士1-2人 +3 | QGZDSYS 2026-03-18 | 4/200 |
|
|
|
[考研] 材料學(xué)碩333求調(diào)劑 +3 | 北道巷 2026-03-18 | 3/150 |
|
|
|
[考研] 313求調(diào)劑 +4 | 肆叁貳壹22 2026-03-19 | 4/200 |
|
|
|
[考研] 266求調(diào)劑 +3 | 哇呼哼呼哼 2026-03-20 | 3/150 |
|
|
|
[考研] 0805材料320求調(diào)劑 +3 | 深海物語 2026-03-20 | 3/150 |
|
|
|
[考研] 二本跨考鄭大材料306英一數(shù)二 +3 | z1z2z3879 2026-03-17 | 3/150 |
|
|
|
[考研] 一志愿武理材料305分求調(diào)劑 +6 | 想上岸的鯉魚 2026-03-18 | 7/350 |
|
|
|
[考研] 一志愿重慶大學(xué)085700資源與環(huán)境專碩，總分308求調(diào)劑 +3 | 墨墨漠 2026-03-18 | 3/150 |
|
|
|
[考研] 288求調(diào)劑 +16 | 于海海海海 2026-03-19 | 16/800 |
|
|
|
[考研] 一志愿中國海洋大學(xué)，生物學(xué)，301分，求調(diào)劑 +5 | 1孫悟空 2026-03-17 | 6/300 |
|
|
|
[考研] 收復(fù)試調(diào)劑生 +4 | 雨后秋荷 2026-03-18 | 4/200 |
|
|
|
[考研] 考研求調(diào)劑 +3 | 橘頌. 2026-03-17 | 4/200 |
|