use strict;
use warnings;

my $number = 8;

for my $i (0 .. 19)
{
    print "present value of the number is:", $number++, "\n";
}