Re: [問題] 列的長度值

[rkcity (喵。罐頭)]

※ 引述《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)
推 sqrt1089:真高手!
→ rkcity:這....
推 sqrt1089:在發問一下，因為我的TXT是從excel轉來了，所以他空白處
→ sqrt1089:是Tab鍵的空白，有啥方法不要算到空白地方？Y
→ rkcity:蛤? 你不是用\t做split了嗎?
推 sqrt1089:是阿，可是從excel轉來，長度不足的，自動補tab空白
→ sqrt1089:就是假設全長是15個，本來2個的會有多13個TAB，不過我把
→ sqrt1089:他補0了然後再把有多少0算出來再相減即可