Se você estiver satisfeito com o separador de milhares definido pela localidade atual, poderá usar o perl
Number :: Format módulo como este:
$ perl -e 'use Number::Format qw(format_number);
print format_number(shift),"\n"' 10000000000000
10,000,000,000,000
(linefeeds extras adicionados para legibilidade. isso pode ser inserido em uma linha)
Se você quiser espaços separando os milhares, independentemente da localidade:
perl -e 'use Number::Format;
my $num= new Number::Format(-thousands_sep=>" ");
print $num->format_number(shift), "\n"' 10000000000000
10 000 000 000 000