sprintf में दशमलव स्थान truncate (गोल नहीं)?

Question

मैं सेंट पॉइंट को इंगित करने के लिए दशमलव बिंदु के बाद डॉलर के मान को दो अंकों के साथ प्रदर्शित करना चाहता हूं। नीचे दिए गए कार्यक्रम में आउटपुट 23.24 है। पर्ल दशमलव स्थानों को गोल करता है। इसे कैसे बचें। मैं आउटपुट 23.23 होना चाहता हूं।

$val=23.2395; 
$testa=sprintf("%.2f", $val); 
print "\n$testa\n $val"; 

Answer 1

print int(23.2395*100)/100; # => 23.23 

Answer 2

Math::Round अलग राउंडिंग तरीकों है।

use Math::Round 'nlowmult'; 
print nlowmult(0.01, 23.2395); # 23.23