Help for this page

Select Code to Download


  1. or download this
    #! /usr/bin/perl
use warnings;
...
my @v = map $_ * 100, 160.22, 160.23;

printf "%.20f %d\n", $_, int for @v;
  2. or download this
    16022.00000000000000000000 16022
16022.99999999999818101060 16022
  3. or download this
    printf "%.20f %.0f %d\n", $_, $_, int for @v;