Re: [問題] 列的長度值

看板Perl作者 (喵。罐頭)時間14年前 (2010/11/04 19:01), 編輯推噓3(305)
留言8則, 2人參與, 最新討論串2/2 (看更多)
※ 引述《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)

11/04 19:52, , 1F
真高手!
11/04 19:52, 1F

11/04 20:07, , 2F
這....
11/04 20:07, 2F

11/08 13:44, , 3F
在發問一下,因為我的TXT是從excel轉來了,所以他空白處
11/08 13:44, 3F

11/08 13:45, , 4F
是Tab鍵的空白,有啥方法不要算到空白地方?Y
11/08 13:45, 4F

11/08 14:07, , 5F
蛤? 你不是用\t做split了嗎?
11/08 14:07, 5F

11/08 20:19, , 6F
是阿,可是從excel轉來,長度不足的,自動補tab空白
11/08 20:19, 6F

11/08 20:20, , 7F
就是假設全長是15個,本來2個的會有多13個TAB,不過我把
11/08 20:20, 7F

11/08 20:20, , 8F
他補0了然後再把有多少0算出來再相減即可
11/08 20:20, 8F
文章代碼(AID): #1CqfA5w2 (Perl)
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):
文章代碼(AID): #1CqfA5w2 (Perl)