perl - 如何在 Perl 中转换科学记数法和十进制记数法？

Question

我知道这完全是一个新手问题，但对于许多新程序员来说，答案可能并不明显。最初对我来说并不是很明显，所以我在 Internet 上搜索 Perl 模块来完成这个简单的任务。

Answer 1

sprintf 成功了

use strict;
use warnings;

my $decimal_notation = 10 / 3;
my $scientific_notation = sprintf("%e", $decimal_notation);

print "Decimal ($decimal_notation) to scientific ($scientific_notation)\n\n";

$scientific_notation = "1.23456789e+001";
$decimal_notation = sprintf("%.10g", $scientific_notation);

print "Scientific ($scientific_notation) to decimal ($decimal_notation)\n\n";

生成此输出:

Decimal (3.33333333333333) to scientific (3.333333e+000)

Scientific (1.23456789e+001) to decimal (12.3456789)