Re: [問題] 如何取出字串中的數字並加以運算

看板Perl作者 (Cindy Wang)時間13年前 (2012/01/31 18:18), 編輯推噓1(101)
留言2則, 1人參與, 最新討論串7/9 (看更多)
※ 引述《drm343 (一卡那亞)》之銘言: : ※ 引述《saka12 (saka)》之銘 : 恕刪 : : 如果使用者只輸入字母,那我要如何print出"無效運算"呢? : : 例如: : : 1 2 12 a 15 b 31 -> 1+2+12+15=30 : : a b c d -> 無效運算 : 我寫了一份 hash 版。 : 因為副程式的參數傳遞本身也是一種陣列結構,所以我這份也不算符合條件。 應該沒有說不能用陣列吧? ^^| : 然後程式碼沒寫得很好,獻醜了。 : http://www.4shared.com/file/rz47rY9t/hello.html : 一開始先用 hash 宣告只有數字符合所求,相當於宣告 \d。 : 然後用 get_str 函數分析字串,利用 " " 將字串分成好幾個不同的子字串。 : 每取出一個子字串就傳給 check_num 函數分析該字串是不是完全由數字組成,\n : 如果是純數字,就回傳這個數字,如果不是純數字,就回傳 0。 : 太久沒寫 Perl,剛剛 debug 半天才想到忘了宣告 my........... 嗯, 如果判斷標準是「這一串裡面完全沒有數字」的叫作無效運算的話, 也是可以純用字串判斷: if( $expr =~ /\d/ ) { # 有數字, 繼續作原有的計算 } else { # 完全沒有數字, 輸出無效運算 } -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 210.242.246.249

01/31 19:12, , 1F
其實我是要回第一篇那篇,只是取錯篇幅了XD
01/31 19:12, 1F

01/31 19:12, , 2F
是回第一篇的不使用陣列跟 RE 情況下啦
01/31 19:12, 2F
文章代碼(AID): #1F9x_akX (Perl)
討論串 (同標題文章)
文章代碼(AID): #1F9x_akX (Perl)