割り算

id:babieさんのところで少し盛り上がったPerlでの割り算のお話。

$ perl -e 'print 10 / 3, "\n"'
3.33333333333333

あうあう、知らなかった……。私ぁ今までどうやって生きてきたんだろう。 で、3 を得るには、正規表現置換かなんかで "." 以降削るのが良いの？ もっとスマートな方法はないべか？

ってことで少し調べてみたわけ。
とりあえずFAQからあたるのスジだべって思って

Perlfaq4の
Does Perl have a round() function? What about ceil() and floor()? Trig functions?"を提案。

いつもは自分も

(int)(10/3)

派でした。

勉強になったのでポインタ貼っておく。