作者rkcity (喵。罐頭)
看板Perl
標題Re: [問題] 列的長度值
時間Thu Nov 4 19:01:15 2010
※ 引述《sqrt1089 (李崩子)》之銘言：
: 假設我也一個txt
: 讀檔後一部分是
: a 0123 qwwe10 qqweggr
: b 0156 w12e
: c 0121 wwerf dqwfw
: 假設我輸入 a 要怎麼得到 4這個值(輸入b得到3，輸入c得到4)
: 就是a那行的字串數 a，0123，qwwe10，qwwe10，別為4個字串
: $array=split/\t/;
: if($array[0] eq $input){
: ..
: .
: 再來就不會了，囧
: 我有找到 #17k5Lsfb這篇文章
: 他的$array[n]是代表第n列
: 就是的$array[0] = a 0123 qwwe10 qqweggr
: $array[1] = b 0156 w12e
: 可是我之前做題目
: $array[0]是代表第一行說就是 a b c;
while( <TXT> ){
@array = split( /\t/ );
# 每次loop @array會是每一列的內容
# Ex: @array = ( 'a', '0123', 'qwwe10', 'qqweggr' );
if( $array[0] eq $input ){
# $array[0] 也就是第一欄的資料
print scalar( @array );
# scalar傳回純量個數
last;
# 還可以加個last跳出迴圈 ._."
}
}
--
◣ █◤ ◥ ◥ ◤ ◆
◥ ◣ ◢ ◣ ◢ █◣ ? ◣ ◢ ◣ ◆
ψrkcity
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 58.114.146.67
※ 編輯: rkcity 來自: 58.114.146.67 (11/04 19:01)
1F：推 sqrt1089:真高手! 11/04 19:52
2F：→ rkcity:這.... 11/04 20:07
3F：推 sqrt1089:在發問一下，因為我的TXT是從excel轉來了，所以他空白處 11/08 13:44
4F：→ sqrt1089:是Tab鍵的空白，有啥方法不要算到空白地方？Y 11/08 13:45
5F：→ rkcity:蛤? 你不是用\t做split了嗎? 11/08 14:07
6F：推 sqrt1089:是阿，可是從excel轉來，長度不足的，自動補tab空白 11/08 20:19
7F：→ sqrt1089:就是假設全長是15個，本來2個的會有多13個TAB，不過我把 11/08 20:20
8F：→ sqrt1089:他補0了然後再把有多少0算出來再相減即可 11/08 20:20