diff options
| author | P. J. McDermott <pj@pehjota.net> | 2017-01-28 15:36:44 (EST) |
|---|---|---|
| committer | P. J. McDermott <pj@pehjota.net> | 2017-01-28 15:36:44 (EST) |
| commit | c8ebbb9159f95f22c70a66d5b1131dd2b2ff9b4b (patch) | |
| tree | 8d0890194245c6015513f172020ef4983fbbb1fe /lib/Math/Decimal/FastPP.pm | |
| parent | 6870d577e37b96bc89ea849c84b5c63044bc0885 (diff) | |
| download | Math-Decimal-FastPP-c8ebbb9159f95f22c70a66d5b1131dd2b2ff9b4b.zip Math-Decimal-FastPP-c8ebbb9159f95f22c70a66d5b1131dd2b2ff9b4b.tar.gz Math-Decimal-FastPP-c8ebbb9159f95f22c70a66d5b1131dd2b2ff9b4b.tar.bz2 | |
dfmt(): Don't interpolate literal strings
Diffstat (limited to 'lib/Math/Decimal/FastPP.pm')
| -rw-r--r-- | lib/Math/Decimal/FastPP.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Math/Decimal/FastPP.pm b/lib/Math/Decimal/FastPP.pm index 0f9960d..8db00a9 100644 --- a/lib/Math/Decimal/FastPP.pm +++ b/lib/Math/Decimal/FastPP.pm @@ -93,9 +93,9 @@ sub dfmt ($s, $i, $f) = $a =~ m/^(-?)(\d*).?(\d*)$/; $l = length($f); - if ($i eq "") { $i = "0"; } - if ($l < $p) { $f .= "0" x ($p - $l); } - return $s . $i . "." . $f; + if ($i eq '') { $i = '0'; } + if ($l < $p) { $f .= '0' x ($p - $l); } + return $s . $i . '.' . $f; } 1; |