
use strict 'vars';
while (<>) {
  chomp;
  my $rounded = sprintf("%.0f", $_);
  print "$_ rounds to $rounded.\n";
}



