Geek Answers Handbook

How can I convert between scientific and decimal notes in Perl?

I know this is a general newbie question, but the answer may not be obvious to many new programmers. This was not initially obvious to me, so I surfed the Internet looking for Perl modules to accomplish this simple task.

+5
source share
2 answers

sprintf does the trick

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";

generates this output:

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

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

In a related topic, if you want to convert decimal notation and technical notation (which is a version of scientific notation), the CPAN Number :: FormatEng module is convenient:

use Number::FormatEng qw(:all);
print format_eng(1234);     # prints 1.234e3
print format_pref(-0.035);  # prints -35m
unformat_pref('1.23T');     # returns 1.23e+12
+3

More articles:


All Articles