use strict;
use warnings;

my $number = 8;

for (1 .. 20) {
    print "present value of the number is:", $number++, "\n";
}


# or

print "present value of the number is:", $number++, "\n" for 1 .. 20;