2009年12月2日

Read-eval-print loop(repl)

・計算機がわりに。変数もつかえます。

C:\>perl -lne "print eval,"
1
1
2
2
3+4
7
333+444
777
234*555
129870
345/456
0.756578947368421
$a=3.14
3.14
$b=4
4
$a*$b
12.56

(Ctrl+Cで中止)


・確認

C:\>perl -MO=Deparse -lne "print eval,"
BEGIN { $/ = "\n"; $\ = "\n"; }
LINE: while (defined($_ = )) {
chomp $_;
print eval $_;
}
-e syntax OK


・文字も入りますがなぜか小文字のm,q,sはなにも返らない?
・WINだからCALC叩いてもいいけど。コピペ使えるし便利だから。

参考リンク
Perl版の「数文字実装irb」を見せていただいたよ!!

0 件のコメント: