#!/usr/bin/env perl -l

use strict;
use warnings;

my $value = 0.9888;

print '"%.2f" --> ', sprintf '%.2f', $value;
print '"%.4f" --> ', sprintf '%.4f', $value;
print '"%.8f" --> ', sprintf '%.8f', $value;