#!/usr/bin/perl

$i = 0.0;

while($i != 5.0) {
    print "$i\n";

#    $i = $i + 0.1;
    $i = $i + 0.5;
}