#!/usr/bin/env perl
use utf8;
use strict;
use warnings;

MAIN:
{
	print "Floating point numbers\n";
	for (my $d = 1.0; $d < 2.01; $d += 0.1) {
		print $d, "\n";
	}
}