[問題]關於用perl寫一個簡單的計算機

看板Perl作者 (~~)時間17年前 (2008/02/18 00:34), 編輯推噓4(400)
留言4則, 3人參與, 最新討論串1/1
最近因為學校某些科目上 必須用到perl 可是由於才初學 還是有很多地方不懂 以下是我寫的一個簡單的加減乘除計算 $ans = ""; $a = 0; $b = ""; $c = 0; for(;;) { chomp ($a = <STDIN>); chomp ($b = <STDIN>); chomp ($c = <STDIN>); if($b eq "+") { $ans = $a + $c; } elsif($b eq "-") { $ans = $a - $c; } elsif($b eq "x") { $ans = $a * $c; } elsif($b eq "/") { $ans = $a / $c; } print "$a" . "$b" . "$c" . "=" . "$ans\n"; } 我嘗試想要再改寫成可以進行四則運算 其中也包含先乘除後加減的模式 不過還是想不太出來 請問能請大家指導一下嗎? 謝謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 61.56.162.213

02/18 00:49, , 1F
用eval ?
02/18 00:49, 1F

02/18 09:30, , 2F
資料結構 中序轉後序
02/18 09:30, 2F

02/18 18:43, , 3F
推snowfly大的eval
02/18 18:43, 3F

02/19 00:52, , 4F
eval算是好辦法...不過要交作業的話八成會被打槍...XD
02/19 00:52, 4F
文章代碼(AID): #17k68GuT (Perl)
文章代碼(AID): #17k68GuT (Perl)