http://www.perlmonks.org?node_id=250088


in reply to Making money look nice

use Number::Format;
my $nf = new Number::Format();
my $money = $nf->format_number(195000);

[download]
also handy when dealing with user input 
$money = $nf->unformat_number($money);

[download]
Your milage my very.

In Section Seekers of Perl Wisdom